使用Select Case 語句來替代在 If... 中使用 ElseIf然後。。。將 一個表達 式與數個不同值進行比較時,會使用 Else 語句。 While If...然後。。。Else 語句可以針對每個 ElseIf 語句評估不同的運算式, Select Case 語句只會在控制項結構頂端評估運算式一次。 在下列範例中, Select Case 語句會評估傳遞至...
使用Select Case语句作为在 If... 中使用ElseIf的替代方法。然后。。。将一个表达式与多个不同值进行比较时的 Else 语句。If...Then...Else语句可计算每个ElseIf语句的不同表达式,Select Case语句则只在控制结构顶部计算一次表达式。 在以下示例中,Select Case语句计算传递给过程的参数。 请注意,每个Case语句可以...
“Case Is <60”语句在第一个条件“Case Is < 0, Is >100”基础上再进行比较,那么成绩“-10”将不符合“<60”这个条件,因为Select Case在处理多条件时,总是按从上到下的顺序处理。如果改变本例的条件顺序,可能产生不同的运算结果。 “Case Else”语句表示如果不符合前面的所有条件,则执行它后面的语句,本...
Case Is >= 60 MsgBox "及格" Case Else MsgBox "不及格" End Select 同时可以针对字符串指定范围和多重表达式。 在下面的例子中,Case 所匹配的字符串为:等于 everything、按英文字母顺序落入从 nuts 到 soup 之间的字符串、以及 TestItem...
为了避免难以弄清的复杂的嵌套的If语句,你可以使用Select Case语句代替。它的语法为: Select Case 测试表达式 Case 表达式1 如果表达式1匹配测试表达式的语句 Case 表达式2 如果表达式2匹配测试表达式的语句 Case 表达式N 如果表达式N匹配测试表达式的语句 Case Else ...
SubNumWithSelectCase() Select Case Range("A1").Value Case 1, 3, 5 MsgBox "单元格A1中的值是5以内的奇数." End Select End Sub 如果单元格A1中是数值1或3或5,运行代码后就会弹出“单元格A1中的值是5以内的奇数.”的消息...
Select Case语句语法包含以下部分: Part说明 testexpression必填。 任何数值表达式或字符串表达式。 expressionlist-n在出现一个Case时是必需的。 以下一个或多个窗体的分隔列表:expression、expressionToexpression、Iscomparisonoperator表达式。 To关键字 (keyword)指定值的范围。 如果使用To关键字,则更小的值必须在To的...
Select Case语句是针对多重判定任务反复进行循环操作的处理。虽然可以使用IF..Then..Else语句来实现,但是使用Select Case语句,不但代码清楚易懂,而且执行也比较快速。Case语句的条件时按照从上到下的顺序执行。…
1、说说VBA中的Select Case语句vbaifselectcase条件语句学习讲解说明it分类:ITSelect Case语句也是条件语句之一,而且是功能最强大的条件语句.它主要用于多条件判断,而且其条件设置灵活、方便,在工作中使用频率极高.本节介绍 Select Case语句的语法及 应用案例.Select Case语句的语法如下:Select Case testexpression Case ...
Select Case语句语法包含以下部分: Part说明 testexpression必填。 任何数值表达式或字符串表达式。 expressionlist-n在出现一个Case时是必需的。 以下一个或多个窗体的分隔列表:expression、expressionToexpression、Iscomparisonoperator表达式。 To关键字 (keyword)指定值的范围。 如果使用To关键字,则更小的值必须在To的...