VBA中CASE语句可以同时选择多个变量一起判断吗?
最新回答
梦在深巷。
2026-10-21 23:33:08
如果是与的关系
嵌套判断，优先级高的放外层!
Select Case 变量1
Case xxx
Select Case 变量2
Case xxx
Func
End Select
End Select
如果是或的关系
放Else里
Select Case 变量1
Case xxx
Func
Case Else
Select Case 变量2
Case xxx
Func
End Select
End Select
函数就可以
消失在我眼中
2026-05-20 23:13:25
本示例使用 Select Case 语句来判断变量的值。示例中第二个 Case
子句包含了变量值，故只有此区块内的语句会被完成到。
Dim Number
Number = 8 ' 设置变量初值。
Select Case Number ' 判断 Number 的值。
Case 1 To 5 ' Number 的值在 1 到 5 之间，包含1 和 5 。
Debug.Print "Between 1 and 5"
' 下一个 Case 子句是本示例中唯一判断值为 True 的子句。
Case 6, 7, 8 ' Number 的值在 6 到 8 之间。
Debug.Print "Between 6 and 8"
Case 9 到 10 ' Number 的值为 9 或 10。
Debug.Print "Greater than 8"
Case Else ' 其他数值。
Debug.Print "Not between 1 and 10"
End Select
热门标签
