Dim blnA As Boolean

20 21 22 23 24 25 26

х = 1

y = 2.87

z = 3.12

blnA = (х > у) And (у < z) 'Результат: blnA = False

blnA = х < у And у < z 'Результат: blnA = True

blnA = х > у Or у > z 'Результат: blnA = False

blnA = Not (х < у Or Not у < z) 'Результат: blnA = False

blnA = Not х > у And х > у 'Результат: blnA = False

blnA = Not (х > у And х > у) 'Результат: blnA = True

Епd Sub

Оператор перехода

Для изменения последовательности выполнения операторов (т. е. для ветвления программы) используется оператор перехода GoTo, имеющий следующий синтаксис:

GoTo метка

В этом операторе метка - это целое неотрицательное число без знака (0, 1, 2, 3,...) или последовательность букв и цифр, начинающаяся с буквы (например, start53a).

Перед оператором, на который должен быть осуществлен переход (или, что то же самое, должно быть передано управление), ставится метка с двоеточием. После выполнения оператора с меткой выполняется оператор, следующий за ним.

Если меткой является целое неотрицательное число, то это число еще называют номером оператора (строки).

Конструкции принятия решений

Для принятия решений в VBA используются операторы условного перехода. Операторы условного перехода - это инструкции, которые определяют ход выполнения других операторов программы в зависимости от результатов анализа некоторых условий. К операторам условного перехода относятся операторы ветвления IF...Then и выбора Select Case. Существует краткая (IF...Then…Else) и полная форма (IF...Then...ElseIf…Else...End If) операторов ветвления.