パスワード入力の日本語入力をオフにしたい

いつもお世話になっています。
ボタンにパスワードを入力するイベントを設定しています。
インプットボタンにカーソルが入ると自動的に日本語入力がオンになります。
これを反対にオフにするようにするにはどうしたらよいか教えてください。
よろしくお願いいたします。

Private Sub ログイン_Click()
If InputBox("パスワードを入力して下さい。, "認証") = "mainte" Then
DoCmd.OpenForm "F_メンテナンスフォーム"
Else
MsgBox "パスワードが間違っています。", vbOKOnly + vbInformation
DoCmd.OpenForm "F_メインフォーム"
End If
End Sub

No.1 ベストアンサー 回答者： funcube 回答日時： 2011/09/30 10:41

テキストボックスだとプロパティウィンドウでIME をコントロール出来るのですが。

インプットボックスでは簡単にできません。

IME のコントロール
http://www.vba-world.com/ime_ctrl.html

InputBoxでIMEをオンにする
http://officetanaka.net/excel/vba/tips/tips16.htm

VBAでIMEの操作はできます
http://questionbox.jp.msn.com/qa3103148.html

を参考にしてください。

参考URL：http://www.vba-world.com/ime_ctrl.html

この回答へのお礼

早々に回答いただきありがとうございます。
簡単に一文加えるだけの問題ではないのですね。
添付のURLを見ながら試作してみます。
ありがとうございました。

お礼日時：2011/09/30 11:30