HOME>TOP>その他

ひらがなをカタカナに変換するには?


キーワード>>StrConv・変換 

Point :ひらがなをカタカナに変換・カタカナをひらがなに変換したい。

Sub Test()
  Dim strMoji
   strMoji = "こむらがえり"

   MsgBox "『" & strMoji & "』をカタカナに変換します。"

   strMoji = StrConv(strMoji, vbKatakana)
   'カタカナに変換

   MsgBox "『" & strMoji & "』"

   MsgBox "今度は、『" & strMoji & "』をひらがなに変換します。"

   strMoji = StrConv(strMoji, vbHiragana)
   'ひらがなに変換

   MsgBox "『" & strMoji & "』"

End Sub


当サイトの全ての内容の無断転載等を一切禁止します。
掲載サンプルコードの使用に関して、直接・間接
を問わず生じた一切の損害について如何なる責任も負いません。
Copyright (C) 2000-2001 reizo All rights reserved.