VB编程 输入一字符,判断其是否是字母,若是字母,再判断是“大写字母”还是“小写字母”

题目

VB编程 输入一字符,判断其是否是字母,若是字母,再判断是“大写字母”还是“小写字母”
若不是字母,则输出：“非字母”.

答案

这个可以
Private Sub Form_Load()
Dim a As String
a = Right(InputBox("输入"),1)
Select Case Asc(a)
Case Asc("a") To Asc("z")
MsgBox "小写字母"
Case Asc("A") To Asc("Z")
MsgBox "大写字母"
Case Else
MsgBox "非字母"
End Select
End Sub