VBA新手继续提问，这是个什么错误？怎么修改？

vba是结合excel使用表格数据的，没必要在提示框、窗体以及窗体控件上花费太大精力。要把重点放在如何处理表格数据上，就跟学习如何灵活使用excel表格函数一样。因此我建议重点是掌握如何引用表、单元格、区域、循环和数组等。而inputbox、msgbox这些在我看来基本没什么用。
可能我理解也不深。

谢谢大家的建议，修改了代码，基本实现了想法，代码如下：
Sub test()
Dim sr As String
Do
sr = InputBox("请输入一个字符")
If Len(sr) = 0 Then
MsgBox "字符不能为空，请重新输入"
ElseIf Len(sr) > 1 Then
MsgBox "字符长度超出2位，请重新输入"
Else
Exit Do
End If
Loop
If sr >= "a" And sr <= "z" Then
MsgBox "您输入的是小写字母"
ElseIf sr >= "A" And sr <= "Z" Then
MsgBox "您输入的是大写字母"
ElseIf sr >= "0" And sr <= "9" Then
MsgBox "您输入的是数字"
Else
MsgBox "您输入的是其他字符"
End If
End Sub