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

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

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

ひらがなをカタカナに変換するには、変換の種類に vbKatakana を設定します。
カタカナをひらがなに変換するには、変換の種類に vbHiragana を設定します。
■実行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