Select Case

Для проверки переменной на соответствие нескольким условиям служит оператор Select Case. При этом в зависимости от значения переменной можно исполнить один из блоков кода. Общий вид данной конструкции выглядит следующим образом:

Select Case variant

Case varValue1

<список операторов 1>

Case varValue2

<список операторов 2>

...

Case varValueN

<список операторов N>

Case Else

<список операторов N+1>

End Select

Алгоритм выполнения данной конструкции:

1. значение переменной variant сравнивается со значением varValue1, если они равны, то выполняется список операторов 1;

2. в противном случае – значение переменной variant сравнивается со значением varValue2, если они равны, то выполняется список операторов 2;

...

n в противном случае – значение переменной variant сравнивается со значением varValueN, если они равны, то выполняется список операторов N;

n+1 в противном случае выполняется список операторов N+1

Пример использования:

Select Case x

Case 1

y=x+1

Case 2

y=x+2

Case 3

y=x+3

Case Else

y=0

End Select

В качестве параметра variant может использоваться переменная любого из подтипов типа Variant, например String, что делает этот оператор очень «удобным» в ситуациях выбора в зависимости от значения переменной с вариантами более двух!!!

Пример:

a=inputbox("Input")

Select Case a

Case "s1" msgbox("s1")

Case "s2" msgbox("s2")

Case "s3" msgbox("s3")

Case "s4" msgbox("s4")

Case Else msgbox("нет такого варианта")

End Select