在文本框的 keypress 事件中放入如下代码即可!
If KeyAscii = 8 Then
KeyAscii = 8
ElseIf KeyAscii < 47 Or KeyAscii > 58 Then
KeyAscii = 0
End If
--- cike ---
以上代码同时支持退格
在文本框的 keypress 事件中放入如下代码即可!
If KeyAscii = 8 Then
KeyAscii = 8
ElseIf KeyAscii < 47 Or KeyAscii > 58 Then
KeyAscii = 0
End If
--- cike ---
以上代码同时支持退格