5. Создание приложений с ветвлением.

Ветвление в Visual Basic организуется с использованием:

• условного оператора IF;

• встроенной функции IIF;

• оператора выбора CASE.

Для проверки одного условия и выполнения оператора или блока операторов используется условный оператор IF...THEN. Этот оператор можно использовать с разным синтаксисом: однострочным (линейным) и многострочным (блочным).

Линейный оператор имеет следующий синтаксис:

If <условие> Then <операторы!> [Else <операторы2>]

Блочный оператор имеет следующий синтаксис:

If <условие> Then <блок операторов 1> [Else <блок операторов2>] End If

Если заданное условие имеет значение True, выполняется блок операторов, в противном случае — блок операторов2. Если предложение Else не задано, при невыполнении условия управление сразу же передается следующему после If оператору.

Оператор If может быть вложенным, т. е. находиться внутри блоков операторов. Для проверки более одного условия и выполнения одного из нескольких блоков операторов используется расширенный условный оператор вида:

If <условие 1> Then <блок операторов 1> Elself <условие 2> Then <блок операторов 2> Elself <условие n> Then <блок операторов n> [Else <блок операторов Else>] End If

Для выбора одного из значений в зависимости от выполнения или невыполнения некоторого условия используется условная функция IIF, имеющая следующий синтаксис:

IIF (<условие>, <значение1>, <значение2>)

Эта функция возвращает значение1, если условие истинно, и значение2, если условие ложно.

В качестве условия можно использовать логическое выражение, возвращающее значение True (Истина) или

False (Ложь), или любое арифметическое выражение (нулевое значение эквивалентно False, а ненулевое — True).

Оператор выбора SELECT CASE используется для проверки одного условия и выполнения одного из нескольких блоков операторов.

Формат записи оператора:

Select Case <проверяемое выражение> Case <список выражений 1> <операторы 1> Case <список выражений 2> <операторы 2> Case <список выражений 3> <операторы 3> Case Else <операторы группы Else> End Select

Проверяемое выражение вычисляется в начале работы оператора Select Case. Это выражение может возвращать значение любого типа (логическое, числовое, строковое).

Список выражений — одно или несколько выражений, разделенных стандартным символом — разделителем (точкой с запятой).

При выполнении оператора проверяется, соответствует ли хотя бы один из элементов этого списка проверяемому выражению.

Эти алименты списка выражений могут иметь одну из следующих форм:

<выражение> — проверяет совпадение заданного выражения с одним из выражений — элементов списка;

<выражение 1> То <выражение 2> — проверяет попадание заданного выражения в указанный диапазон;

< Is <логический оператор> < выражение> — проверяет выполнение указанного условия для заданного выражения.

6. Создание приложений с использованием циклов.

В Visual Basic применяются три конструкции операторов цикла:

• For ... Next

• While ... Wend

• Do ... Loop

Оператор цикла For...Next имеет формат:

For <счетчик> = <начало> То <конец> [Step <приращение>] <операторы тела цикла>

Next [<счетчик>]

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

Оператор цикла WHILE...WEND используется для организации циклов с предусловием и имеет следующий формат:

While <условие продолжения цикла> <операторы тела цикла> Wend

Операторы, перечисленные в цикле, выполняются до гех пор, пока выполняется заданное условие продолжения цикла. При этом условие проверяется перед выполнением цикла, следовательно, цикл может не выполнятьcя ни разу, если условие нарушается в самом начале.

Оператор цикла DO...LOOP используется для орга-шзации циклов с неопределенным числом повторений с предусловием и с постусловием).

Этот оператор для организации цикла с предусловием может использоваться в двух модификациях:

а) Do While <условие продолжения цикла>

<операторы тела цикла>

Loop

б) Do Until <условие прекращения цикла>

<операторы тела цикла>

Loop

Операторы, перечисленные в цикле, выполняются до ех пор, пока выполняется заданное условие продолжения цикла, если задано предложение While, или до тех ор, пока нарушается условие прекращения цикла. Для организации цикла с постусловием оператор Do Loop также может быть использован в двух модификациях:

в) Do

<операторы тела цикла>

Loop While <условие продолжения цикла>

г) Do

<операторы тела цикла>

Loop Until <условие прекращения цикла>

Условие выполнения или прекращения цикла здесь проверяется в конце. Поэтому этот цикл обязательно выполняется хотя бы один раз.

15