Select Case语句包括四部分,每部分详细含义如表38-1所示。 表38-1Select Case语句各部分含义 部分 描述 testexpression 必要参数。任何数值表达式或字符串表达式 expressionlist-n 如果有Case出现,则为必要参数。其形式为expression,expression To expression,Is comparisonoperator。expression的一个或多个组成的分界列表。...
Case Is >= 60 MsgBox "及格" Case Else MsgBox "不及格" End Select 同时可以针对字符串指定范围和多重表达式。 在下面的例子中,Case 所匹配的字符串为:等于 everything、按英文字母顺序落入从 nuts 到 soup 之间的字符串、以及 TestItem...
如果没有一个Case子句后面的表达式匹配测试表达式的值的话,VB就会跳到Case Else子句并执行该语句直到遇到关键字End Select。注意,Case Else子句是可选的,如果你的程序里面没有使用Case Else并且没有一个Case子句的表达式和测试表达式相匹配,VB就会跳到End Select后面的语句,并且继续执行你的程序。 我们来一个使用Sel...
1 首先是打开vba的编程界面。2 然后是新建一个子过程test7，并写上注释内容。3 定义一些变量。Dim btn As Integer Dim mybutton As Integer Dim question As String Dim title As String 4 为这些变量赋值。btn = vbYesNoCancel + vbQuestion + vbDefaultButton question = "do you want to open a new wo...
使用Select Case语句作为在 If... 中使用ElseIf的替代方法。然后。。。将一个表达式与多个不同值进行比较时的 Else 语句。If...Then...Else语句可计算每个ElseIf语句的不同表达式,Select Case语句则只在控制结构顶部计算一次表达式。 在以下示例中,Select Case语句计算传递给过程的参数。 请注意,每个Case语句可以...
If…Then…Else…End If语句会计算每个ElseIf语句的不同的表达式。在控制结构的顶部，而Select Case 语句只计算表达式一次。在下面的示例中，Select Case语句会计算发送给此过程的参数performance。请注意，每个Case语句可以包含一个以上的值、一个值的范围、一个值的组合以及比较运算符。如果Select Case语句与Case语句...
[Case Else [elsestatements]]End Select 2）说明：① testexpression必需。 任何数值表达式或字符串表达式。② expressionlist-n 在出现一个 Case 时是必需的。可以使用To关键字指定值的范围。如果使用To关键字，则更小的值必须在 To 的前面显示。将Is关键字与比较运算符一起使用（Is和Like一起使用的情况除外...
Select Case语句语法包含以下部分: Part说明 testexpression必填。 任何数值表达式或字符串表达式。 expressionlist-n在出现一个Case时是必需的。 以下一个或多个窗体的分隔列表:expression、expressionToexpression、Iscomparisonoperator表达式。 To关键字 (keyword)指定值的范围。 如果使用To关键字,则更小的值必须在To的...
Case 1 To 5,Is >99 这行表示如果变量x的值为1到5之间，或者x值大于99，那么就执行之后的语句。Case 21 to 80 表示如果X的值是21到80之间，就执行下面的语句。Case Else 表示上面的条件都不为真，就执行之后的语句。End Select 表示Select Case条件语句结束。重点掌握了其应用的语句规则，就得心应手了。...
表38-1 Select Case语句各部分含义 部 分 描 述 testexpression 必要参数。任何数值表达式或字符串表达式 expressionlist-n 如果有 Case 出现，则为必要参数。其形式为 expression，expression To expression，Is comparisonoperator。expression的一个或多个组成的分界列表。To关键字可用来指定一个数值...