Module
Contents
Index 🔎︎

# Select...Case Statement

依據表示式的值定義一個或多個陳述式區塊。

## 語法：

    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