如果没有一个Case子句后面的表达式匹配测试表达式的值的话,VB就会跳到Case Else子句并执行该语句直到遇到关键字End Select。注意,Case Else子句是可选的,如果你的程序里面没有使用Case Else并且没有一个Case子句的表达式和测试表达式相匹配,VB就会跳到End Select后面的语句,并且继续执行你的程序。 我们来一个使用Sel...
Case Is >= 60 MsgBox "及格" Case Else MsgBox "不及格" End Select 同时可以针对字符串指定范围和多重表达式。 在下面的例子中,Case 所匹配的字符串为:等于 everything、按英文字母顺序落入从 nuts 到 soup 之间的字符串、以及 TestItem...
“Case Is <60”语句在第一个条件“Case Is < 0, Is >100”基础上再进行比较,那么成绩“-10”将不符合“<60”这个条件,因为Select Case在处理多条件时,总是按从上到下的顺序处理。如果改变本例的条件顺序,可能产生不同的运算结果。 “Case Else”语句表示如果不符合前面的所有条件,则执行它后面的语句,本...
1、说说VBA中的Select Case语句vbaifselectcase条件语句学习讲解说明it分类:ITSelect Case语句也是条件语句之一,而且是功能最强大的条件语句.它主要用于多条件判断,而且其条件设置灵活、方便,在工作中使用频率极高.本节介绍 Select Case语句的语法及 应用案例.Select Case语句的语法如下:Select Case testexpression Case ...
1 1.点击鼠标右键选择新建一个Excel表格。2 2.根据自身的需要输入对应项目,然后制定判断规则。作者这里为90以上为优秀;80到90为良好;70到80为中等;60到70为一般。3 3.选择开发工具选项中的“宏”选项。4 4.输入判断规则的名称,然后点击“创建”按钮。5 5.写入判断成绩的代码。主要利用的代码为Select case...
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…Case…End Select语句 当一个表达式与几个不同的值相比较时,可以使用Select Case分支判断语句替换使用在If…Then…Else…End If语句中的ElseIf。If…Then…Else…End If语句会计算每个ElseIf语句的不同的表达式。在控制结构的顶部,而Select Case 语句只计算表达式一次。在下面的示例中,Select Case...
使用Select Case语句作为在 If... 中使用ElseIf的替代方法。然后。。。将一个表达式与多个不同值进行比较时的 Else 语句。If...Then...Else语句可计算每个ElseIf语句的不同表达式,Select Case语句则只在控制结构顶部计算一次表达式。 在以下示例中,Select Case语句计算传递给过程的参数。 请注意,每个Case语句可以...
Select Case语句是针对多重判定任务反复进行循环操作的处理。虽然可以使用IF..Then..Else语句来实现,但是使用Select Case语句,不但代码清楚易懂,而且执行也比较快速。Case语句的条件时按照从上到下的顺序执行。…
1 Select Case 语句的理解 这种语句可以执行几组语句的其中一个,具体取决于表达式的值。1)语法:Select Case testexpression [Case expressionlist-n [statements-n]][Case Else [elsestatements]]End Select 2)说明:① testexpression必需。 任何数值表达式或字符串表达式。② expressionlist-n 在出现一个...