Question

vb 中怎样判断输入的字符是否是汉字

Answer 1

0<族信ascii<255
我来补充一下代码吧,在form中加入一个Text1
Private Sub Text1_Change()
If Text1.Text = "" Then Exit Sub '如果是空字符串,就退出此过程
Dim a
a = Asc(Mid(Text1.Text, Len(Text1.Text), 1))
If a > 255 Or a < 0 Then MsgBox "刚才输入的是汉字" Else MsgBox "刚输入的是字符"
End Sub
这是靠ASCII码来判断的,你根据你的程旦孙序需兆迟轮要进行修改吧,这是对输入框约束输入的比较常用的方法之一,你可以去搜索一下英文字符ASCII码表.

Answer 2

用函数Asc(),如果小于0的就是汉字册祥（非州没搏Ascii）,>0的就是Ascii， 这个函数只取字符串的第一个字符进行计察州算。 如Asc("A")，结果就是65 Asc("我")，结果是-12590