| 投稿日 | ： 2005/02/03(Thu) 11:42 |
| 投稿者 | ： ゆり |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: フォーム自体にIMEモードを設定したい |
舌足らずですみません・・・。質問の仕方に気をつけます。
ラベルのみの子フォームで選択された数字を親フォームに渡したいのですが
現在は、数字を打ち込むとひらがなモードになっている
ときにきちんと動作しないので、この子フォームが表示されているときは
IMEモードを数字のみ、というようにしたいです。
よろしくお願い致します。
Private Sub Form_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case Asc("0") To Asc("9")
'ここで選択されたキーを変数にいれています。
Unload Me
End Select
End Sub