[求助]vb的textbox控件
有谁知道让vb的textbox控件里面只能输入数值型数据的方法???????????急用,快告诉我,谢谢了!!!!!
添加一个 TextBox 控件,命名为 Text1。
代码:
Private Sub Text1_KeyPress(ByVal KeyAscii As Integer, ByVal Shift As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
KeyAscii = 0
Beep '播放警告声音
End If
End Sub