4.4.5.Программирование алгоритмов линейной структуры

Алгоритм линейной структуры представляется сравнительно простой последовательностью операторов, которые и выполняются так же последовательно. Например, в следующем фрагменте при нажатии на кнопку событие Click изменяет свойство Caption объекта Label:

Private Sub Command1_Click()

Label.Caption = «Линейный алгоритм»

End Sub

Линейный алгоритм предполагает выполнение программы последовательно от первого до последнего оператора, после выполнения которого программа завершается.

4.4.6.Программирование алгоритмов разветвляющейся структуры

Для управления ходом выполнения программы на основании некоторых условий, возникающих в программе, в составе системы Visual Basic используются операторы принятия решения. Эти операторы поддерживают программирование алгоритмов разветвляющейся структуры. К ним относятся операторы If и Select Case.

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

Существует две разновидности оператора If – однострочный и блочный (многострочный).

Однострочный оператор If имеет следующий синтаксис;

If <условие> Then <оператор>

Блочный оператор If имеет синтаксис:

If <условие> Then

<оператор>

End If

При выполнении оператора If сначала проверяется условие и если оно истинно, то выполняется оператор, стоящий за словом Then.

Если в зависимости от истинности условия необходимо выполнить группу операторов, то применяется блочный оператор If:

If <условие> Then

<блок операторов>

End If

Эта же конструкция применяется в случае, если возникает необходимость обработки ложных условий. При этом в конструкцию добавляется ключевое слово Else:

If <условие> Then

<блок операторов 1>

Else

<блок операторов 2>

End If

В этом фрагменте выполняется <блок операторов 1>, если условие истинно и выполняется <блок операторов 2>, если условие ложно.

Если требуется проанализировать несколько условий, то к оператору If добавляется ключевое слово ElseIf :

If <условие 1> Then

<блок операторов 1>

ElseIf <условие 2>

<блок операторов 2>

Else

<блок операторов 3>

End If

В данном фрагменте сначала анализируется <условие 1>. Если оно истинно, то выполняется <блок операторов 1>, если оно ложно, то проверяется на истинность <условие 2>. В случае, если <условие 2> истинно, выполняется <блок операторов 2> и если оно ложно выполняется <блок операторов 3>.

Обрабатывать несколько условий в программе можно с помощью оператора Select Case. Этот оператор состоит из двух частей – анализируемого выражения и набора операторов Case для каждого из возможных решений. Синтаксис оператора Select Case имеет вид:

Select Case <Тестируемое_Значение>

Case <Значение 1>

<блок операторов 1>

Case <Значение 2>

<блок операторов 1>

………..

End Select

Выполнение этой конструкции начинается с проверки тестируемого значения. Если <Тестируемое_Значение> равно параметру Значение, стоящему после некоторого оператора Case, то выполняется соответствующий <блок операторов >. Следует иметь ввиду, что в блоке Select Case всегда выполняется только одна группа операторов, расположенных после оператора Case.

Следует помнить и том, что параметры <Тестируемое_Значение> и Значение должны иметь одинаковые типы.