Sisukord
Register 🔎︎

# Select...Case Statement

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

### Süntaks:

      Select Case expression
         Case values
           Statement Block
      [  Case values2
           Statement Block]
      [  Case Else
           Statement Block]
      End Select

### Parameetrid:

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

values: Any value list that is compatible with the expression. The statement block that follows the Case clause is executed if expression matches values.

### 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

Sarnased teemad

If statement

Iif or Switch functions