フォームテキストボックスのIME入力モードの設定をVBAで行う

Accessのフォームのテキストボックスプロパティに「IME入力モード」の設定をしている場合・・・

他テキストボックスにも、制御しているモードが引き継がれてしまう対処。（全角カタカナなど）

IME入力モードの設定をおこなっているテキストボックスを「A」とする。

方法

1. A以外のテキストボックスプロパティの「IME入力モード」を全角ひらがなにする。
   
   ※各テキストボックスで理想的な入力モードでOK（全角ひらがなでなくてもよい）
2. Aのテキストボックスプロパティの「フォーカス喪失後イベント」に下記のVBAを入力。
   
   Private Sub A_LostFocus()
   
       Me.A.IMEMode = 5
   
   End Sub

以上。

おそらくこれでいけると思いますが、変更あれば随時修正予定です。


参考URL
　　http://accessclub.jp/bbs/0229/beginers70715.html

　　http://www.geocities.jp/cbc_vbnet/cnntrol/text.html#ime