IBM Lotus Symphony


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


Комментарии по продукту | Дополнительная документация | Товарные знаки