Select Case 情况条件选择
本命令与If有点类似,但是没If灵活,适用范围比较局限。
Selse Case只能判断两个值是否相等,无法判断大于小于之类的情况。
[按键精灵] 纯文本查看复制代码
Dim i
i = 0
Select Case i
Case 0, 1
TracePrint "你输入的是0或者1"
Case 2
TracePrint "你输入的是2"
Case 3
TracePrint "你输入的是3"
Case 4
TracePrint "你输入的是4"
Case Else
TracePrint "请输入0到4这五个数字!"
End Select
再次强调,他不支持大小判断,我见过一些同学写成了 Select Case i>0 之类的这种写法,这是错误的。
另外,它也不支持And,Or这些运算符,不要出现 Case 1 and 2 或者 Case 1 or 2 之类的写法,如果你想要表达或的关系,可以使用逗号,例如 Case 1,2 这种,没法表达And关系,因为它只是用来判断一个变量值的东西。