Access97のテキストボックスプロパティの入力規制について

質問はAccessのテキストボックスに
パスワードを入力する機能についてです。

パスワードは6桁の半角英数字のみ入力可能にしたいです。

現在、以下のことを試し、
半角英数字が6桁入力できるようになりました。

テキストボックスのプロパティで
定型入力部分に「password」と設定しテキストボックスに
パスワードが「****」で表示できるようにしました。
そして6桁にしたいので、
入力規制の部分に「like "??????"」と設定しました。

問題は半角英数字は入力できるのですが、
スペースや記号も入力できてしまうことです。
スペースや記号は入力できないように設定することは可能でしょうか？
また入力規制の部分で、半角英文字、半角数字を設定することは
可能でしょうか？

何か解決法がありましたら、教えてください。
よろしくお願いします。

No.1 ベストアンサー 回答者： tsukasa-12r 回答日時： 2004/08/08 05:23

イベントプロシージャを使えば入力そのものをできなくすることができます。

Private Sub テキスト1_KeyPress(KeyAscii As Integer)
Select Case Chr(KeyAscii)
Case vbBack

Case " ", Is <= "0"
KeyAscii = 0
End Select
End Sub

のようにすれば、スペースや記号を入力しようとしてキーを押しても入力されなくなります。

この回答へのお礼

回答ありがとうございました。
早速試してみたところ、やりたいことが
解決できました。
この方法を使わせてもらいます。
ありがとうございました。

お礼日時：2004/08/08 06:35