18. Использование оператора условия в Visual Basic (if-then-else). Примеры.

Ветвление If ... Then ... Else

Этот оператор обычно используется, когда проверяется одно или два условия в программе. Конструкцию If ... Then ... Else ...(Если ... Тогда ... Иначе ...) можно записать в одном из двух форматов - блочном (в несколько строк) и линейном (в одной строке).

Линейный формат:

If логич_выражение Then блок_команд_1 [Else блок_команд_2]

Если логич_выражение принимает значение «истина», выполняется блок_команд_1, иначе выполняется блок_команд_2.Else можно опустить, в этом случае, , если логич_выражениеложно, блок_команд_1 просто пропускается.

Пример 1:

Если значение переменной А больше нуля, то вычислить А², иначе - вычислить А³

If A>0 Then S= A^2 Else S=A^3

Пример 2:

Если значения переменных А и В равны между собой , то прервать выполнение процедуры

If A=B Then Exit Sub

Блочный формат:

If логич_выражение_1 Then

блок_команд_1

[ElseIf логич_выражение_2 Then

блок_команд_2

....................................

[Else

блок_команд_n

End If

Если логич_выражение_1 принимает значение «истина», выполняется блок_команд_1, иначе, если логич_выражение_2истинно, выполняется блок_команд_2 и т.д. Если ни одно условие не удовлетворяется, то выполняется блок_команд_n, следующий за Else.

Пример 1:

Если значения переменных А и В положительны, то вывести их сумму и произведение, в противном случае - вывести сообщение об ошибке.

If A>0 And B>0 Then

Print A+B

Print A*B

Else

Print «ошибка»

End If

Пример 2:

Если значение переменной В меньше 10, то увеличить его в 2 раза, если значение от 10 до 20, то увеличить в 3 раза, в остальных случаях - уменьшить в 10 раз.

If B<10 Then

B=B*2

ElseIf B>=10 And B<=20 Then

B=B*3

Else

B=B/10

End If

19. Оператор множественного выбора Select Case. Примеры.

Оператор множественного выбораSelect Case

Используется при необходимости осуществить проверку более сложных условий.

Формат команды

Select Case арифм_выражение или симв_выражение

Case условие 1

блок команд 1

Case условие 2

блок команд 2

...........................

Case Else

блок команд n

End Select

В поле операндов Select Case записывается произвольное арифметическое выражение или символьное выражение, которое в процессе выполнения программы принимает то или иное числовое, логическое или символьное значение.

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

1. Case константа_1, константа_2,...

2. Case Is знак_отношения константа

3. Case константа_1 To константа_2

Алгоритм множественного выбора заключается в следующем. Сначала вычисляется значение выражения, записанного в SelectCase. Далее проверяется, удовлетворяет ли это значение одному из указанных в Case условий. Если значение удовлетворяет какому-то условию, выполняется блок команд, следующий за данным Case. Если ни одно условие не удовлетворяется, выполняется блок команд, следующий за Case Else. При выполнении того или иного блока команд управление передается команде, следующей за End Select.

Пример:

Input A

Select Case A

Case 1,5

Print «А равно 1 или 5»

Case Is >5

Print «А больше 5»

Case -8 TO 2.5

Print «А не меньше -8, но не больше 2.5»

Case Else

Print «Ни одно условие не выполняется»

End Select