VBS教程：VBScript 语句-Select Case 语句

Select Case 语句
根据表达式的值执行几组语句之一。

Select Case testexpression
[Case expressionlist-n
[statements-n]] . . .
[Case Else expressionlist-n
[elsestatements-n]]
End Select

参数
testexpression

任意数值或字符串表达式。

expressionlist-n

如 Case 出现则必选项。一个或多个表达式的分界列表。

statements-n

当 testexpression 与 expressionlist-n 中的任意部分匹配时，执行的一条或多条语句。

elsestatements-n

当 testexpression 与 Case 子句的任何部分不匹配时，执行的一条或多条语句。

说明
如果 testexpression 与任何 Case expressionlist 表达式匹配，则执行此 Case 子句和下一个 Case 子句之间的语句，对于最后的子句，则会执行该子句到 End Select 之间的语句，然后控制权会转到 End Select 之后的语句。如 testexpression 与多个 Case 子句中的 expressionlist 表达式匹配，则只有第一个匹配后的语句被执行。

Case Else 用于指示若在 testexpression 和任何其他 Case 选项的 expressionlist 之间未找到匹配，则执行 elsestatements。虽然不是必要的，但最好是将 Case Else 语句置于 Select Case 块中以处理不可预见的 testexpression 值。如果没有 Case expressionlist 与 testexpression 匹配且无 Case Else 语句，则继续执行 End Select 之后的语句。

Select Case 语句可以是嵌套的，每一层嵌套的 Select Case 语句必须有与之匹配的 End Select 语句。

下面例子举例说明如何使用 Select Case 语句:

代码如下:

Dim Color, MyVar
Sub ChangeBackground (Color)
   MyVar = lcase (Color)
      Select Case MyVar
           Case "red"    document.bgColor = "red"
           Case "green"  document.bgColor = "green"
           Case "blue"   document.bgColor = "blue"
           Case Else     MsgBox "选择另一种颜色"
      End Select
End Sub

赞 (0)

相关推荐

  • VBS中Select CASE的其它用法

    marr=20select case true case marr<12  response.write "小于12" case marr>12  response.write "大于12" case marr=12  response.write "=="end select   还可以这样用 case marr> 7 and marr<12

  • VBS教程：VBScript 语句-Select Case 语句

    Select Case 语句根据表达式的值执行几组语句之一. Select Case testexpression[Case expressionlist-n[statements-n]] . . .[Case Else expressionlist-n[elsestatements-n]]End Select 参数testexpression 任意数值或字符串表达式. expressionlist-n 如 Case 出现则必选项.一个或多个表达式的分界列表. statements-n 当 te

  • VBS教程：VBScript 基础-使用条件语句

    使用条件语句控制程序执行使用条件语句和循环语句可以控制脚本的流程.使用条件语句可以编写进行判断和重复操作的 VBScript 代码.在 VBScript 中可使用以下条件语句: If...Then...Else 语句 Select Case 语句使用 If...Then...Else 进行判断If...Then...Else 语句用于计算条件是否为 True 或 False,并且根据计算结果指定要运行的语句.通常,条件是使用比较运算符对值或变量进行比较的表达式.有关比较运算符的详细信息,请参阅比

  • VBS教程：VBscript语句-功能介绍

    VBScript 语句描述语言元素将控制权交给一个 Sub 或 Function 过程.Call 语句声明一个类的名称.Class 语句声明用于替换文字值的常数.Const 语句声明变量并分配存储空间.Dim 语句当某个条件为 True 时或在某个条件变为 True 之前重复执行一个语句块.Do...Loop 语句重新初始化固定大小的数组的元素和释放动态数组的存储空间.Erase 语句执行一条或多条指定语句.Execute 语句在一个脚本的全局命名空间中执行一条或多条语句.ExecuteGlob

  • VBS教程：VBscript语句-If...Then...Else 语句

    If...Then...Else 语句 根据表达式的值有条件地执行一组语句. If condition Then statements [Else elsestatements ] 或者,使用块形式的语法: If condition Then[statements][ElseIf condition-n Then[elseifstatements]] . . .[Else[elsestatements]]End If 参数condition 一个或多个下面两种类型的表达式: 数值或字符串表达式,

  • VBS基础篇 - 条件语句(if与Select Case)

    If...Then...Else 在下面的情况中,您可以使用 If...Then...Else 语句: 在条件为 true 时,执行某段代码 选择两段代码之一来执行时 dim a '定义一个变量 a = 100 if a < 200 then a = 300 '若i<200,则对i重新赋值 msgbox a '输出的值为300 要运行多行代码,必须使用多行(或块)语法,多行(或块)语法包含 End If 语句 dim a,b,c a=inputbox("请输入a的值:")

  • ASP中用select case代替其他语言中的switch case, default用case else

    asp中不能用switch语句,要用select case语句了 简单的介绍一下 选择报表的工作一样,如果语句.然而不同的是,他们可以检查多个值.当然,你有 多个相同的,如果.. else语句,但是这并不总是最好的方法. 选择语句允许一个程序来计算表达式,并试图匹配表达式的值案件标签.如果找到匹 配,程序执行相关的声明.对于SELECT语句的语法如下: select case expression case label_1 statements_1 case label_2 statements

  • Swift流程控制之循环语句和判断语句详解

    Swift流程控制之循环语句和判断语句详解

    Swift提供了所有c类语言的控制流结构.包括for和while循环来执行一个任务多次:if和switch语句来执行确定的条件下不同的分支的代码:break和continue关键字能将运行流程转到你代码的另一个点上. 除了C语言传统的for-condition-increment循环,Swift加入了for-in循环,能更加容易的遍历arrays, dictionaries, ranges, strings等其他序列类型. Swift的switch语句也比C语言的要强大很多. Swift中swi

  • VBS教程：VBscript语句-Exit 语句

    Exit 语句退出 Do...Loop.For...Next.Function 或 Sub 代码块. Exit Do Exit For Exit Function Exit Property Exit Sub Exit 语句的语法有以下几种形式: 语句描述Exit Do提供一种退出 Do...Loop 语句的方法.只能在 Do...Loop 语句中使用.Exit Do 将控制权转移到 Loop 语句之后的语句.在嵌套的 Do...Loop 语句中使用时,Exit Do 将控制权转移到循环所在位置

  • VBS教程：VBScript 基础-使用循环语句

    使用循环语句循环用于重复执行一组语句.循环可分为三类:一类在条件变为 False 之前重复执行语句,一类在条件变为 True 之前重复执行语句,另一类按照指定的次数重复执行语句. 在 VBScript 中可使用下列循环语句: Do...Loop: 当(或直到)条件为 True 时循环. While...Wend: 当条件为 True 时循环. For...Next: 指定循环次数,使用计数器重复运行语句. For Each...Next:对于集合中的每项或数组中的每个元素,重复执行一组语句.(

  • VBS教程：VBscript语句-Function 语句

    Function 语句声明 Function 过程的名称.参数以及构成其主体的代码.  [Public [Default]| Private] Function name [(  arglist)][statements][name = expression][Exit Function] [statements][name = expression]End Function 参数Public 表示 Function 过程可被所有脚本中的所有其他过程访问. Default 只与 Class 块中

随机推荐