Module
Contents
Index 🔎︎

# Select...Case Statement

1 ないし複数のステートメントブロックを、与えられた表式に応じて選択します。

## 構文:

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

## パラメーター:

Condition: 個々の Case 句に続くステートメントブロックを実行するかの判定基準となる表式。

Expression: Condition の判定基準と対比させる、同じ変数型の表式。各 Case 句に続くステートメントブロックは、該当する Expression が Condition と一致した場合にのみ実行されます。

## 例:

    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