直接判断就可以了
自己写个函数IsValidInput(text As String)
然后逐个判断String中的每个字符是否满足如下条件:
(text(i)>"A" And text(i)<"Z")
Or (text(i)>"a" And text(i)<"x")
Or (text(i)>"0" And text(i)<"9")
自己写个函数IsValidInput(text As String)
然后逐个判断String中的每个字符是否满足如下条件:
(text(i)>"A" And text(i)<"Z")
Or (text(i)>"a" And text(i)<"x")
Or (text(i)>"0" And text(i)<"9")
if not ((keyascii>=48 and keyascii<=57) or (keyascii>=97 and keyascii<=122) or (keyascii>=65 and keyascii<=90)) then
'48-57是数字0-9的ASCII码,97-122是a的ASCII码,65-90是A-Z的ASCII码
如果上面条件成立,则说明不是正常字符,你可以加入你自己的代码。
希望这能让你满意!
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Chr(KeyAscii) Like "[!0-9A-Za-z]" And KeyAscii <> 8 Then KeyAscii = 0
End Sub