Блочный синтаксис

If ЛВ1 Then

[Инструкции1]

[ElseIf ЛВi Then

[Инструкцииi]]

[Else

[Инструкции2]]

End If

Если в зависимости от условия необходимо выполнить не одну инструкцию, а несколько инструкций, следует использовать блочный синтаксис. Это относится и к ветви Else. Кроме того, блочная структура с ElseIf позволяет анализировать несколько условий. Здесь каждая из Инструкции1, Инструкции2 и ИнструкцииI – это одна или несколько инструкций.

Выполнение этой инструкции If состоит в следующем. Сначала проверяется значение ЛВ1. Если оно истинно, то выполняется группа Инструкции1 и на этом выполнение инструкции If завершается. Если же значение ЛВ1 ложно, то проверяется значение следующего условия ЛВi. Если оно истинно, то выполняется группа ИнструкцииI и на этом выполнение инструкции If завершается. Если же значение ЛВi ложно, то проверяется следующее ЛВi. Если же все ЛВi оказываются ложными, то выполняется группа инструкций Инструкции2.

Пример 4

If A = 7 Then

Beep

End If

В этом примере звуковой сигнал прозвучит только в том случае, если значение переменной А равно 7.

Пример 5

If Name = "Иванов" Then

Print "Ваша карточка удерживается!"

Else

Print "Получите деньги, пожалуйста!"

End If

В этом примере, если значение переменной Name равно “Иванов”, то будет выведено Ваша карточка удерживается!. При любом другом значении переменной Name будет выведено Получите деньги, пожалуйста!

Пример 6

If Обращение = 1 Then

Print "Здравствуйте, господин"

ElseIf Обращение = 2 Then

Print " Здраствуйте, госпожа"

Elself Обращение = 3 Then

Print " Здравствуйте, дамы и господа"

Else

Print "Здравствуйте, люди"

End If

Для этого примера результат вывода показан в таблице:

Инструкция выбора Select Case (выбрать в случае)

Еще одной инструкцией VB, предназначенной для программирования разветвлений, является Select Case (инструкция выбора), которая позволяет выполнить одну из нескольких групп операторов в зависимости от значения некоторого выражения.

Инструкция Select Case имеет следующий синтаксис:

Select Case Проверочное_выражение

[Case Значение1

[Инструкции1]]

[Case Значение2

[Инструкции2]]

[Case Else

[ИнструкцииЗ]]