在VBA或VB系语言里写多条件判断时，Select Case结构比连续的If...ElseIf更清晰，而Case后跟Is的写法又进一步简化了比较逻辑。可不少人对这个Is存在误解，要么把它当成If TypeOf里判断对象类型的关键字，要么写出Case Is > 60 And Is < 80这种看似合理实际无法通过编译的语句。本文就围绕Case子句配合Is的使用方法展开，把语法规则、正确组合、典型错误都讲明白。
一、Case子句里的Is到底是什么
先明确一点：Select Case中的Is不是变量，也不是对象比较符。它是一个占位符，用来代表Select Case后面那个测试表达式。比如你写Select Case score，那么所有Case Is后面出现的Is就都指score。换句话说，Case Is > 60就是去比较score > 60是否成立。这种设计的价值在于，当测试表达式本身很长或需要多次比较时，不用在每一个Case后重复写出完整表达式。
还要注意，这个Is和If TypeOf obj Is ClassName里的Is不是一回事。后者用来判断对象是否属于某个类，而Case子句里的Is只能和比较运算符一起出现。理解这一点能避免很多语法混淆。如果你之前一直在If里使用Is做对象判断，现在进入Select Case语法环境，需要提醒自己切换思路。
从语义上看，Case Is更像是一种简写机制。VBA解释器看到Case Is > 10，实际上把它还原为对测试表达式的一次大于比较。它本身没有储存值的能力，也不能单独写成Case Is然后什么都不接。这个规则很机械，但正因为机械，出错时反而容易排查。
二、Is的常见写法与组合规则
最典型的用法是和比较运算符搭配。下面这段代码根据分数输出不同等级。
<code>Select Case score
Case Is > 90
Debug.Print "优秀"
Case Is > 80
Debug.Print "良好"
Case Is > 60
Debug.Print "及格"
Case Else
Debug.Print "不及格"
End Select</code>这里每个Case Is后都只跟一个比较表达式。需要注意Select Case自上而下匹配，一旦命中某个Case就不再检查后面的条件，所以上面把大于90放在大于80之前是正确的。如果顺序反过来，大于90的分数会先命中大于80这一条，输出结果就会出错。这是很多初学者没有意识到的问题。
除了单个比较，Case后还可以用逗号隔开多个条件，逗号代表或关系。比如要判断一个数字小于10或者大于100，可以写成下面这样。
<code>Select Case num
Case Is < 10, Is > 100
Debug.Print "处于两端区间"
Case 10 To 100
Debug.Print "处于中间区间"
End Select</code>这种写法相当于If num < 10 Or num > 100。要注意两个Is条件之间用的是逗号，不是And，也不是Or。逗号在这里承担列清单的作用，表示满足其中任意一个即可。下面的表格整理了常见比较运算符和对应示例。
| 运算符 | 含义 | 示例 |
|---|---|---|
| > | 大于 | Case Is > 100 |
| < | 小于 | Case Is < 50 |
| >= | 大于等于 | Case Is >= 60 |
| <= | 小于等于 | Case Is <= 40 |
| = | 等于 | Case Is = 0 |
| <> | 不等于 | Case Is <> 0 |
从表中可以看到，等于和不等于虽然也能用Is写，但实际开发中如果只是判断一个固定值，直接写Case 0或Case 5更简洁。Is加等号的写法更多出现在需要强调比较关系，或者和其他Is条件并列时使用。
三、几个最容易踩的误区
第一个误区是试图用And或Or把两个Is比较连起来。例如Case Is > 60 And Is < 80。从自然语言上理解似乎没有问题，但在VBA语法里，Case子句后的表达式列表不支持这种逻辑连接。正确表达区间的做法是使用To关键字，写成Case 61 To 79，或者把边界拆成两个Case分别处理。这不是VBA故意为难人，而是Select Case本身的设计就把每个Case项视为独立的匹配条件，多个项之间只能通过逗号做或运算。
第二个误区是把Case Is和If中的对象判断混用。有人在Select Case里写出Case Is Nothing，或者Case Is = obj这样的语句，希望判断对象是否为空或是否是某个对象。这属于概念混淆。Select Case的Is只能用于数值或字符串等可比较的表达式，不用于对象引用比较。对象判断应该放回If TypeOf或者If obj Is Nothing里完成。
第三个误区是误以为Case Is后面必须跟等号。实际上Is后面可以跟任何有效的比较运算符，大于、小于、不等于都可以。反而只写Case Is = 10虽然语法没错，但不如直接Case 10来得直观。很多人第一次见到Case Is > 80时，会不适应地把Is理解为“是”，以为这是判断分数是大于80这种说法不通。其实把它替换成score再读一遍就顺了。
第四个误区是忽略Case匹配顺序。Select Case并不是找到最精确的条件，而是从上到下找到第一个满足的条件。如果先写Case Is > 60，再写Case Is > 80，那么90分会进入大于60的分支。这个问题与Is本身无关，但在写Is比较时尤其容易出现，因为比较条件之间天然存在包含关系。养成从极端值往中间值排列的习惯可以避免这种逻辑错误。
四、一个完整的多条件分支示例
下面用一个员工绩效评级的例子把前面提到的规则串起来。假设score是0到120之间的分数，要划分成S、A、B、C、D五个等级，其中异常值需要单独提示。
<code>Select Case score
Case Is < 0, Is > 120
Debug.Print "分数异常，请检查录入"
Case Is > 100
Debug.Print "S级"
Case Is > 85
Debug.Print "A级"
Case Is > 70
Debug.Print "B级"
Case Is > 60
Debug.Print "C级"
Case Else
Debug.Print "D级"
End Select</code>这个结构里，第一行用逗号处理两个异常区间，后面从高分到低分依次排列，最后用Case Else兜底。这样写下来，每个分支的意图都很直接，也不容易出现条件交叉。需要再次强调的是，两个Is条件之间的逗号表示或关系，不要把它读成与关系。
如果把分数区间改成闭区间，例如60到70分算C级，那么建议使用To关键字，写成Case 60 To 70。这样比强行用Is更清晰。Select Case强大的地方就在于它允许具体值、To区间、Is比较三种形式混合出现在同一个结构里，只要每个Case项后面是一个合法的表达式列表即可。
最后提醒一句，Is虽然能简化写法，但如果一个Select Case里超过一半的Case都在使用Is，并且条件之间互相嵌套、边界复杂，可能说明这个分支逻辑本身就值得重构。可以把复杂的条件先拆成布尔变量，或者改用If语句处理。工具本身没有绝对优劣，用对场景才能让代码更好维护。
Select CaseIs子句VBA条件判断修改时间：2026-09-20 19:00:23