想使vb中文本框只能输入数字，输入其他字符时无反应，该怎样写文本框change事件代码啊？

设置一个文本框名为"text1"

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
Case Else
KeyAscii = 0
End Select
End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/v3ve7y77j.html