| 投稿日 | ： 2005/04/19(Tue) 13:07 |
| 投稿者 | ： いち |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： テキストボックスに数値のみ入力可能にするには？ |
よろしくお願いします。
VB6.0 WIN2000Pro
テキストボックスに数値のみ入力したいのですが、テキストボックスを何個か作ったので配列になっ
ていま
す。この配列で実行するとエラーになってしまいます。
何か良い方法は無いでしょうか？よろしくお願いします。
text1(0)〜text1(10)まであります。
Private Sub text1_KeyPress(KeyAscii As Integer)
If Asc(KeyAscii) >= 48 And 57 <= Asc(KeyAscii) Or Asc(KeyAscii) = 8 Then
Exit Sub
Else
End If
KeyAscii = 0
End Sub