Module
Contents
Index 🔎︎

# 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