模块
目录
索引 🔎︎

# Select...Case 语句

根据表达式的值定义一个或多个语句块。

## 语法:

    Select Case condition Case expression Statement Block[Case expression2 Statement Block][Case Else] Statement Block End Select

## 参数:

「Condition」: 任意表达式，用于控制是否执行各个 Case 子句之后的语句块。

「Expression」: 与 Condition 类型表达式兼容的任意表达式。如果「Condition」与 Expression 匹配，则执行 Case 子句之后的语句块。

## 示例:

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "Number from 1 to 5"
            Case 6, 7, 8
                Print "Number from 6 to 8"
            Case 8 To 10
                Print "Greater than 8"
            Case Else
                Print "Out of range 1 to 10"
        End Select
    End Sub