小文字から大文字に変換するには UCase 関数、大文字から小文字へ変換するにはLCase 関数を使かえるのはご存知だと思います。
しかし、カタカナからひらがなに、ひらがなからカタカナへの変換方法を知ってますか？

Dim kStr$, hStr$
'カタカナからひらがなへ変換
kStr = StrConv("アーダコウダ", vbHiragana)

'ひらがなからカタカナへ変換
hStr = StrConv("なにがなしして", vbKatakana)

ＶＢでは文字列を Unicode としているので、

Dim i%
i = Len("123あいう")
' i には６が返る

i = LenB("123あいう")
' i には１２が返る

となります。しかし、時にはそれを、半角は１バイト、全角は２バイトと数えたい場合があります。

i = LenB(StrConv("123あいう", vbFromUnicode))
' i には９が返る

このホームページのホストは です。 無料ホームページをどうぞ！