dnf怎么看战斗力值:在vb中怎么屏蔽用户输入的全角特殊字符
来源:百度文库 编辑:神马品牌网 时间:2024/05/13 07:59:01
,如,‘;“:。等
来个简单一点的
Private Sub Text1_KeyPress(KeyAscii As Integer)
dim cTemp as string
cTemp = "#$%^&*" '禁止输入的字符
if instr(1,cTemp,chr(KeyAscii)) <> 0 then keyascii = 0
End Sub
'说明一下: instr,查找字符. CHR将Ascii码转换为字符.