2.8. Программирование ветвлений

В разветвляющихся и циклических процессах используются операции сравнения, имеющие следующие знаки:

= - равно;

< > - неравно;

< - меньше;

> - больше;

< = - меньше или равно;

> = - больше или равно;

Like - сравнение строк.

Среди операций сравнения операции « = » присвоен 1-й приоритет, остальные операции имеют более низший одинаковый приоритет.

Действие знака « = » в условном операторе и операторе присваивания различно. Так, в операторе присваивания, например:

new num = 10 * 5

выражение всегда записывается справа от знака " = ". В условном операторе операция сравнения является частью этого оператора и выраже­ние может находиться слева от знака " = ", например:

If 10*5 = new num

Then MsqBox “The values are equal”

Операция Like сравнивает строку текста с образцом и применяется, например, для поиска номера телефона по фамилии абонента или наоборот, поиска книг по библиотечным каталогам и др.

Ветвления осуществляются с помощью условных операторов. Синтаксис операторов зависит от используемых в программе результатов проверки логического условия и необходимого числа выполняемых операторов.

1. Используется результат проверки логического условия только

"истинно" (True).

Однострочный оператор If применяется для выполнения одного оператора или вызова процедуры. Синтаксис оператора:

If условие Then выполняемый оператор,

где If и Then - ключевые слова условного оператора.

Логическое условие, в операторе используют одну из операций сравнения. Выполняемым оператором в операторе ветвления может быть любой оператор, включая вызов процедуры.

Если логическое условие выполняется (принимает значение "истинно" (True, 1,), то управление передается выполняемому оператору, который записывается в строке условного опера­тора после слова Then. При невыполнении логического условия (значения условия "ложно", False, 0) выполняется следующая строка программы.

Пример:

If Payment3 = 100 Then A = Payment3.

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

Синтаксис оператора:

If условие Then

оператор 1

оператор 1

End If,

где If, Тhen и End If – ключевые слова условного оператора.

В блочном условном операторе не допускается запись выполняемых операторов (вызов процедур) в строке за словом Тhen.. Между словами If и End If можно пометить любое количество операторов. При невыполнении логического условия все выполняемые опе­раторы пропускаются. Следующим выполняемым оператором будет первый оператор, следующий за словами End If.

Пример:

If SPan1 >= Argum Then

SPan2 = 10*2

Span3 = 10*3

Span4 = 10*4

End If.

2. Используется результат проверки логического условия только “ложно” (False).

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

- в логическом условии изменить знак сравнения на противоположный (например, « = »изменить на « < > », «< = » изменить на «> =» и др.);

- использовать в условном операторе слово Not.

Синтаксис операторов:

Однострочный