Условные операторы

В языке VBA, как и в других языках программирования, основными элементами, управляющими ходом выполнения процедуры, являются условные операторы. Наиболее простой из них — оператор If . . . Then:

If Полина = "Ж" Then

Поздравление = "С 8 марта!"

End if

Если условие, заданное выражением между ключевыми словами If и Then выполняется, соблюдаются инструкции внутри блока, ограниченного ключевыми словами Then и End if. Иначе операторы между ключевыми словами не выполняются, а ACCESS перейдет к обработке оператора, который следует за ключевыми слова End if. В случае необходимости произвести два различных действия (одно при соблюдении условия, а второе — нет), надлежит воспользоваться полной формой оператора If:

If выражение Then

Оператор1

Else

Оператор2

End if

Если условие соблюдается, выполняется Оператор1 (или группа операторов, расположенных между ключевыми словами Then и Else, а если не соблюдается — Оператор2 (или группа операторов, расположенных между ключевыми словами Else и End if.

Однако, не всегда возможны два варианта решения. Учитывая это, VBA предоставляет в распоряжение пользователей оператор Select Case, предназначенный для выбора одного из множеств вариантов решений:

Select Case Город

Case "Киев"

Код_МТС = "044"

Case "Москва"

Код_МТС = "095"

Case "Тула"

Код_МТС = "0872"

Case Else

Print "Я не знаю такого города!"

End Select

При выполнении этого оператора проверяется значение переменной Город. В зависимости от результата проверки переменной Код_МТС присваивается телефонной код некоторого города. Если значение переменной Город не совпадает ни с одним из значений, перечисленных в строках с ключевым словом Case, производится действие, указанной между ключевыми словами Case Else и End Select.