Sisukord
Register 🔎︎

# Select...Case Statement

Määrab sõltuvalt avaldise väärtusest ühe või mitme lause sisu.

## Süntaks:

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

## Parameetrid:

Condition: suvaline avaldis, mis määrab, kas vastavale Case lausele järgnev lause sisu käivitatakse või mitte.

Expression: tingimusetüübiga ühilduv suvaline avaldis. Case lausele järgnev lause sisu käivitatakse, kui parameeter Tingimus vastab parameetrile Avaldis.

## Näide:

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "Arv vahemikus 1 kuni 5"
            Case 6, 7, 8
                Print "Arv vahemikus 6 kuni 8"
            Case 8 To 10
                Print "Suurem kui 8"
            Case Else
                Print "Väljaspool vahemikku 1 kuni 10"
        End Select
    End Sub