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...
Select Case语句语法包含以下部分: Part说明 testexpression必填。 任何数值表达式或字符串表达式。 expressionlist-n在出现一个Case时是必需的。 以下一个或多个窗体的分隔列表:expression、expressionToexpression、Iscomparisonoperator表达式。 To关键字 (keyword)指定值的范围。 如果使用To关键字,则更小的值必须在To的...
如果没有一个Case子句后面的表达式匹配测试表达式的值的话,VB就会跳到Case Else子句并执行该语句直到遇到关键字End Select。注意,Case Else子句是可选的,如果你的程序里面没有使用Case Else并且没有一个Case子句的表达式和测试表达式相匹配,VB就会跳到End Select后面的语句,并且继续执行你的程序。 我们来一个使用Sel...
VBA中的select case 怎样使用？方法/步骤 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 ...
如果Select Case語句不符合任何Case語句中的值,則會執行選擇性的Case Else語句。 VB 複製 Function Bonus(performance, salary) Select Case performance Case 1 Bonus = salary * 0.1 Case 2, 3 Bonus = salary * 0.09 Case 4 To 6 Bonus = salary * 0.07 Case Is > 8 Bonus = 100 Case Else Bonus ...
表38-1 Select Case语句各部分含义 部 分 描 述 testexpression 必要参数。任何数值表达式或字符串表达式 expressionlist-n 如果有 Case 出现，则为必要参数。其形式为 expression，expression To expression，Is comparisonoperator。expression的一个或多个组成的分界列表。To关键字可用来指定一个数值...
这种时候应该选择IF语句case判断里面可以写1 to 5这样方便的区间判断 比IF方便太多case判断里可以写逗号...
If…Then…Else…End If语句会计算每个ElseIf语句的不同的表达式。在控制结构的顶部，而Select Case 语句只计算表达式一次。在下面的示例中，Select Case语句会计算发送给此过程的参数performance。请注意，每个Case语句可以包含一个以上的值、一个值的范围、一个值的组合以及比较运算符。如果Select Case语句与Case语句...
Case 1 To 5,Is >99 这行表示如果变量x的值为1到5之间，或者x值大于99，那么就执行之后的语句。Case 21 to 80 表示如果X的值是21到80之间，就执行下面的语句。Case Else 表示上面的条件都不为真，就执行之后的语句。End Select 表示Select Case条件语句结束。重点掌握了其应用的语句规则，就得心应手了。...