ch=inputbox("请输入升猜一个字符:")
="A" And ch="a" And ch<="z"
msgbox(ch & "是字母")
else
="0" And ch<="9" then
msgbox(ch & "颂笑困是数字")
msgbox(ch & "不是字母,也野念不是数字")
end if
根据输入字符的ASCII值判断。乎搏Private Sub Text1_KeyPress(KeyAscii As 历顷皮Integer)
= 48 And 肢差KeyAscii = 97 And KeyAscii <= 122 Then
Text1 = Text1
Else
KeyAscii = 0
End If
End Sub
可以当数据完全输入芹宏完毕,在按钮单击事件里,执行丛液处理程嫌郑册序前,加以判断:
dim i as integer
for i=1 to len(text1.text)
="0" and mid(text1.text,i,1)<="9") Or _
="a" and mid(text1.text,i,1)<="z") Then
msgbox "输入的数据只包含数字和小写字母"
msgbox "输入的数据包含 [数字和小写字母] 之外的字符!"
next i
以上就是土嘎嘎小编大虾米为大家整理的vb判断输入字符为字母_vb判断大小写字母相关主题介绍,如果您觉得小编更新的文章对您有所帮助,不要忘记讲本站分享给您身边的朋友哦!!