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

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

= - равно;

< > - неравно;

< - меньше;

> - больше;

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

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

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.

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

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

If Not условие Then оператор;

Блочный

If Not условие Then

оператор 1

оператор 2

End If

При невыполнении логического условия управление передается следующей строке программы, а при выполнении условия – оператору, следующему за End If.

Пример:

If Not ABC = CEF Then ABC/10.5

З. Используются оба результата проверки логического условия:

"истинно" и "ложно"

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

If условие Then

операторы 1

Else

операторы 2

End If,

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

операторы - группа операторов.

При выполнении логического условия программа выполняет операторы 1, затем пропускает все операторы 2 и начинает выполнение первого оператора после End If.

При невыполнении логического условия программа пропустит все операторы 1 до слова Else и выполнит все операторы 2.

Примеры:

1)

If Abs £ 50 Then

y = A*0.125E-5

Else

y = A/0.125E5

End If.

2)

If Sqr > 10 Then

Sum=5

Else

Sum=15

End If.

Кроме оператора If, Then, Else для присвоения значений переменной можно воспользоваться однострочным оператором IIF

результат = IIF (условие, результат переменной при выполнении

условия, результат переменной при невыполнении условия),

Тогда предыдущий пример 2) запишется в виде:

Sum = IIF (Sqr > 10, 5, 15).

Условные операторы позволяют реализовать переключающую структуру алгоритма. Для проверки нескольких логических условий при значении первого условия "ложно" в условном операторе используется слово Else If, которое позволяет задать дополнительные логические условия. Синтаксис оператора:

If условие 1 Then

операторы 1

ElseIf condition2 Then

операторы 2

ElseIf condition3 Then

операторы 3

Else

операторы 4

End If,

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

В качестве условий могут использоваться операции сравнения. Такая конструкция позволяет включить все операторы при выполнении всех логических условий. Если результатом проверки всех логических условий будет значение "ложно", то программа выполнит только операторы, находящиеся между словами Else и End If.

Пример:

If Number >= 100 Then

Number = Number1

ElseIf Number >= 80 Then

Number = Number2

ElseIf Number >= 60 Then

Number = Number3

Else

Number = NumberEnd

End If.

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

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

Select Case тест

Case значение 1

операторы 1

Case значение 2

операторы 2

[Case Else

операторы 3 ]

End Select,

где Select Case, Case, Case Else и End Select – ключевые слова оператора;

тест – проверочное значение переменной для сравнения с другими значениями;

значение – значение переменной, сравниваемое с тестом.

При равенстве значений теста и значения 1 выполняются операторы 1, стоящие за первым словом Case. Если тест и значение 1 не равны, то программа переходит к следующему по порядку сравнению Case. При заданном значении теста может выполняться только одна группа операторов. Если ни одно из значений не совпадает с тестом, то программа переходит к выполнению первого оператора после End Select или к выполнению операторов 3.

Пример:

Select Case Number OR

Case 10

Number*10

Case 100

Number*100

Case Else

Number + Number OR

End Select.

Слово Case может содержать не только отдельное значение, но и интер­валы значений, например:

Case 5, 10 То 20, Is >= 50,

где 5 - отдельное значение;

10 То 20 - интервал значений от 10 до 20;

Is >= 50 - значения равные или большие 50.

Выбор операторов If или Select Case определяется тем, какой оператор в конкретной программе проще и нагляднее.