关于Chr函数的一个小疑问

yangaocheng 2010-04-14 10:39:26
有这么一个VBA程序:
Dim ch As String
ch = Chr(CInt(InputBox("请输入字符的ASCII码", "输入")))
Select Case ch
Case Is < Chr(32)
MsgBox "控制字符"
Case "-"
MsgBox ch
Case Else
MsgBox "其他字符"
End Select
如果输入“45”,则弹出消息框显示“控制字符”;如果将程序中第一个Case子句和第二个Case子句调换前后顺序,同样输入“45”,则弹出消息框显示“-”。这说明ch与第一个Case和第二个Case子句都是匹配的。与Case "-"匹配我没疑议,为什么会与Case Is<Chr(32)匹配呢,45对应的字符为“-”,32对应的字符为空格,“-”怎么会小于空格呢?真是百思不得其解啊?
...全文
38 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
ACMAIN_CHM 2010-04-15
  • 打赏
  • 举报
回复
建议调试中看一下 ch 的实际值是多少。
zzyong00 2010-04-14
  • 打赏
  • 举报
回复
Option Compare Binary

2,462

社区成员

发帖
与我相关
我的任务
社区描述
VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区管理员
  • VBA
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧