一个拣分的问题，在线等待！！

Question

很简单啦在keypress事件中控制就可以了

Answer 1

在 onchange事件中写不就行了

Answer 2

例如，如果要控制不能输入数字：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii >= Asc("0") And KeyAscii <= Asc("9") Then
    KeyAscii = 0
End If
End Sub

Answer 3

用MASKEDBOX控件，什么都不用写。。改一下MASK就可以了

Answer 4

1)用MASK框
2）用判断函数例如ISEMPTY,ISNUMERIC,ISDATE,等等

Answer 5

比如只输入数字
Private Sub Text1_KeyPress(KeyAscii As Integer)
    if KeyAscii<48 or KeyAscii>57 then
    KeyAscii=0
End Sub
呵呵,和lingll的一样
48和57是0和9的Ascii码