Съдържание
Индекс 🔎︎

# Оператор Select...Case

Изпълнява един или повече операторни блока според стойността на израз.

## Синтаксис:

    Select Case условие Case израз операторен блок [Case израз2 операторен блок][Case Else] операторен блок End Select

## Параметри:

Условие: израз, който определя дали ще се изпълни операторният блок, следващ съответната клауза Case.

Израз: израз, съвместим с типа на израза „Условие“. Операторният блок, следващ клаузата Case, се изпълнява, ако Условие отговаря на Израз.

## Пример:

    Sub ExampleRandomSelect
    Dim iVar As Integer
        iVar = Int((15 * Rnd) -2)
        Select Case iVar
            Case 1 To 5
                Print "Число от 1 до 5"
            Case 6, 7, 8
                Print "Число от 6 до 8"
            Case 8 To 10
                Print "По-голямо от 8"
            Case Else
                Print "Извън диапазона от 1 до 10"
        End Select
    End Sub