VBで文字コードの変換

解決

neko 2006-09-15 20:36:53 No: 133277

VBでの文字コードの変換の仕方が分かりません
例：「か」→「が」
ボタンを押して変換したいと思っています。キャプションを使わずに。

考え方は、ＶＢの文字コードの数字をいじって、か→がとかにしたいと
思っていますが、それが上手くいかずに困ってます。文法も考え付きません
もしよろしければお願いいたします

通ってみた 2006-09-15 21:49:10 No: 133278

その例では何がしたいのかわからないわけで
それと環境は？

ヒント：
「か」の文字コードを「が」の文字コードを比較してみるとか

私にはキャプションを使うっていう意味もよくわからない・・・

KG 2006-09-15 21:53:06 No: 133279

Hex Asc Chrあたりを使えばお望みの事はできるとおもいます。

#キャプションの意味が私も理解できませんが、、、

neko 2006-09-15 22:17:29 No: 133280

返信ありがとうございます。
環境は：VisualBasic6.0

すいませんでした、詳しく書きます。
ラベルのキャプションに入力された、文字に濁点を付けたい時の質問でした
例でいうと
Label1.caption = "か"
と入っている文字を"が"などに変換したいと思い、質問しました。

Blue 2006-09-15 22:43:25 No: 133281

>と入っている文字を"が"などに変換したいと思い、質問しました。
「など」とは？
ほかにも変換したいものがあるんでしょうか？
そしてその規則は何でしょうか？

通ってみた 2006-09-15 23:10:03 No: 133282

細かい処理は抜きで考えれば、これだけですけど・・・

※Command1とLabel1を配置、Label1のCaptionは「か」としておく

Private Sub Command1_Click()

Label1 = Chr$(Asc(Label1) + 1)

End Sub

neko 2006-09-15 23:17:31 No: 133283

たくさんの返事ありがとうございます。
「など」とは濁点、半濁点です。
規則とはなんでしょうか？すいません理解力が無くて。

通ってみたさんのを打ってやってみましたがChr$のsubまたはFunctionが
定義されていませんと出ました。初めて使った言葉なので
もしよろしければ教えていただけると助かります。

自分でも色々調べてみます。みなさんありがとうございます

通ってみた 2006-09-15 23:40:32 No: 133284

解説するのも恥ずかしいくらいの内容なのですが・・・

Asc(Label1)
でLabel1の文字コード、つまり「か」の文字コードを取得します
それに＋１すると「が」になります

Label1 = Chr$(「が」の文字コード)
となりますので、「が」の文字コードを文字に変換したものがLabel1に入ります

Label自体を変化させたくなければ、「Label1 =」の部分を文字列変数にするなりテキストボックスにするなりしてください

＞Chr$のsubまたはFunctionが定義されていませんと出ました。
Chr$は予約語なのでそのエラーが出るとは考えられないのですが・・・
打ち間違えていませんか？

Blue 2006-09-15 23:41:01 No: 133285

>「など」とは濁点、半濁点です。
ハ行はどうなるんでしょうか？
それと、カタカナ(全角半角ともに)はどうなるのでしょうか？

neko 2006-09-16 05:25:16 No: 133286

打ち間違えでした(´・ω・)
皆様ありがとうございました、勉強になります