Module
Contents
Index 🔎︎

# Select...Case Statement

Defines one or more statement blocks depending on the value of an expression.

## Синтаксис

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

## Parameters:

Condition: Any expression that controls if the statement block that follows the respective Case clause is executed.

Expression: Any expression that is compatible with the Condition type expression. The statement block that follows the Case clause is executed if Condition matches Expression.

## Намуна

    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