2.8. Логические выражения и вычисление их значений.
Логические выражения называют условиями. Условие, если оно выполняется, имеет значение True, если не выполняется, - False. Эти логические значения являются результатами вычисления логических выражений.
Условия различают простые и сложные.
Для построения простых условий используются операции сравнения: >, <, =, >=,<=, <>.
Для построения сложных условий используются логические операции Not, And, Or.
Результаты выполнения логических операций для логических выражений A и B приведены в таблице 2.3:
Таблица 2.3
A |
B |
Not A |
A And B |
A Or B |
True |
True |
False |
True |
True |
False |
True |
True |
False |
True |
True |
False |
False |
False |
True |
False |
False |
True |
False |
False |
2.9. Программирование ветвлений
Ветвление в VISAUL BASIC организуется с использованием:
условного оператора IF
встроенной функции IIF
оператора выбора CASE
Условный оператор if
Для проверки одного условия и выполнения оператора или блока операторов используется оператор IF…THEN. Этот оператор можно использовать с разным синтаксисом: однострочным (линейным) и многострочным (блочным).
а) Однострочный:
If условие Then операторы1 [Else операторы2]
б) Блочный:
If условие Then
блок операторов1
[Else
блок операторов2]
End If
Р
ис.
2.15. Пример решения
задачи с
использованием блочного оператора IF:
в) Для проверки более одного условия и выполнения одного из нескольких блоков операторов используется оператор вида:
If условие 1 Then
блок операторов 1
ElseIf условие 2 Then
блок операторов 2
…………….
ElseIf условие n Then
блок операторов n
[Else
блок операторов Else]
End If
Пример:
Public Function Obr_Err (Err_Num As Integer) _
As Integer
Dim Txt As String
If Err_Num=6 Then
Txt=”переполнение” : Obr_Err=2
ElseIf Err_Num=11 Then
Txt=”деление на нуль” : Obr_Err=2
Else
Txt=”нераспознанная ошибка”&Err_Num : Obr_Err=3
EndIf
Err.Clear
MsgBox Txt, VbOkOnly, “Ошибки выполнения”
End Function
Функция 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 To выражение 2
I
s
логический оператор(оператор сравнения)
выражение
Например, Is >= 10
Рис.2.16. Пример решения задачи с использованием оператора Select Case