Модул
Съдържание
Индекс 🔎︎

# Оператор 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