难道中文字不是字符型,还是我的代码错了

我输入字母和数字都行,但我输入一个中文时就会显示

那他所指的其他字符是什么?求问

中文不可能只占"1个字符"

要不问问老师是什么原因吧@cbm666

Private Sub Command1_Click()
Dim ch As String * 1 'string*1表示ch中存放一个字符
ch = InputBox("input")
If Asc(UCase(ch)) >= 65 And Asc(UCase(ch)) <= 90 Then '大小写均考虑
MsgBox (ch + "是字母")
ElseIf Asc(UCase(ch)) >= 48 And Asc(UCase(ch)) <= 57 Then
MsgBox (ch + "是数字")
Else
MsgBox (ch + "既不是字母,也不是数字")
End If
End Sub
你的代码
ElseIf ch >= 0 And ch <= 9 Then
得改为
ElseIf ch >="0" And ch <= "9" Then
因为你的ch是文字 必须使用双引号