Question

VB编程求解 点击命令按钮command1，程序输入一个字符，可以是字母或数字0-9，输出其分类（

VB编程求解
点击命令按钮command1，程序输入一个字符，可以是字母或数字0-9，输出其分类（小写字母，大写字母，数字），使用inputbox和msgbox函数完成输入输出

Answer 1

Private Sub Command1_Click()
Dim c As String
c = InputBox("请输入一个字母或数字")
Select Case c
Case "a" To "z"
    MsgBox "你输入的是小写字母"
Case "A" To "Z"
    MsgBox "你输入的是大写字母"
Case "0" To "9"
    MsgBox "你输入的是数字"
Case Else
    MsgBox "输入错误！"
End Select
End Sub

Answer 2

如需要错误判断和处理，还需要自己增加代码：
Private Sub Command1_Click()
x = InputBox("请输入")
x = Asc(x)
If x > 47 And x < 58 Then
MsgBox "数字"
ElseIf x > 63 And x < 91 Then
MsgBox "大写字母"
ElseIf x > 96 And x < 123 Then
MsgBox "小写字母"
End If
End Sub