[Case Else [不符合条件时执行的代码]] End Select 表达式:表示任何数值表达式或字符串表达式 省略号代表可以使用多个条件。只要有一个Case就需要有一个条件,子句Case Else是可选的,在所有Case条件都不满足时执行。 Case后面的“条件”,有多种写法: A.一个表达式。 B.表达式1 To 表达式2,表达式1要小于表达式2。
'把变量a作为Select Case语句“表达式” Case 0 To 59: MsgBox "不合格" '如果“表达式”的值在0-59(含0和59)之间则执行本行语句,否则忽略,可以使用“开始值 to 结束值" 指定一个范围 Case 60 To 75: MsgBox "合格" Case 76 To 89: MsgBox "良好" Case 90 To 100: MsgBox "优秀" End Select End...
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...
1 1.点击鼠标右键选择新建一个Excel表格。2 2.根据自身的需要输入对应项目，然后制定判断规则。作者这里为90以上为优秀；80到90为良好；70到80为中等；60到70为一般。3 3.选择开发工具选项中的“宏”选项。4 4.输入判断规则的名称，然后点击“创建”按钮。5 5.写入判断成绩的代码。主要利用的代码为Select case。
[Case Else [elsestatements]]End Select 2）说明：① testexpression必需。 任何数值表达式或字符串表达式。② expressionlist-n 在出现一个 Case 时是必需的。可以使用To关键字指定值的范围。如果使用To关键字，则更小的值必须在 To 的前面显示。将Is关键字与比较运算符一起使用（Is和Like一起使用的情况除外...
Case 1: MsgBox "1" Case "A" MsgBox "A" Case Else MsgBox "未知值" End Select B. 表达式 TO 表达式 要求较小的表达式要出现在TO的前面 Dim Chenji As Integer Chenji = 50 Select Case Chenji Case 90 To 100 '成绩在90到100...
Case 1 To 5,Is >99 这行表示如果变量x的值为1到5之间，或者x值大于99，那么就执行之后的语句。Case 21 to 80 表示如果X的值是21到80之间，就执行下面的语句。Case Else 表示上面的条件都不为真，就执行之后的语句。End Select 表示Select Case条件语句结束。重点掌握了其应用的语句规则，就得心应手了。...
End Select 表达式:表示任何数值表达式或字符串表达式 省略号代表可以使用多个条件。只要有一个Case就需要有一个条件,子句Case Else是可选的,在所有Case条件都不满足时执行。 Case后面的“条件”,有多种写法: A.一个表达式。 B.表达式1 To 表达式2,表达式1要小于表达式2。
Case 23, 24 msg = "午夜" End Select MsgBox "现在是:" & msg End Sub ___ 以上代码中,“Case 1 To11”表示当前时间在1点到11点,用于限定一个范围;“Case 12”是表示当前时间为12点时返回True,可用于限制一个具体的值,或者多个值。如果需要罗列多个具体的值,那么需要在每个值之间使用逗号分隔,例如...
怎么用VBA中select.case完成这个条件 '如果一定要使用zhidaoSELECT CASE,建议这样写版 SelectCaseRange("a1") CaseIs< 0: MsgBox"z" Case0To10: MsgBox"a" Case11To15: MsgBox"b" Case16To20: MsgBox"c" Case21To30: MsgBox"b" Case31To40: MsgBox"c"...