Access : ひらがなをカタカナに、カタカナをひらがなに変換

Access VBAで、ひらがな-カタカナ変換するには、StrConv関数を使用します。

構文: StrConv( 変換する文字列 , 変換の種類 , 国別情報識別子)
国別情報識別子は省略できます。

ひらがなをカタカナに変換するには、変換の種類に vbKatakana を設定します。
カタカナをひらがなに変換するには、変換の種類に vbHiragana を設定します。

スポンサーリンク




BackHome BackTipsへ Backメニューへ

■実行Access画面
文字の変換フォーム

■ひらがなをカタカナに変換したフォーム
あめりかがアメリカに変換されました

■カタカナをひらがなに変換したフォーム
アメリカがあめりかに変換されました

スポンサーリンク



■ Access VBA 実行コード例

Option Compare Database
Option Explicit

Private Sub コマンド2_Click()
    Dim s1 As String
    If IsNull(Me!テキスト0) Then
        Beep
        Exit Sub
    End If
    s1 = StrConv(Me!テキスト0, vbKatakana)
    Me!テキスト0 = s1
End Sub

Private Sub コマンド3_Click()
    Dim s1 As String
    If IsNull(Me!テキスト0) Then
        Beep
        Exit Sub
    End If
    s1 = StrConv(Me!テキスト0, vbHiragana)
    Me!テキスト0 = s1
End Sub

スポンサーリンク




BackHome BackTipsへ Backメニューへ

Copyright(C) FeedSoft