End Select
Case Else
Оператор выбора SELECT CASE
Функция IIF
End If
Условный оператор IF
Программирование ветвлений
Логические выражения и вычисление их значений.
Логические выражения называют условиями. Условие, если оно выполняется, имеет значение True, если не выполняется, - False. Эти логические значения являются результатами вычисления логических выражений.
Условия различают простые и сложные.
Для построения простых условий используются операции сравнения: >, <, =, >=,<=, <>.
Для построения сложных условий используются логические операции Not, And, Or.
Результаты выполнения логических операций для логических выражений A и B приведены в таблице:
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 |
Ветвление в VISAUL BASIC организуется с использованием:
· условного оператора IF
· встроенной функции IIF
· оператора выбора CASE
Для проверки одного условия и выполнения оператора или блока операторов используется оператор IF…THEN. Этот оператор можно использовать с разным синтаксисом: однострочным (линейным) и многострочным (блочным).
а) Однострочный:
If условие Then операторы1 [Else операторы2]
б) Блочный:
If условие Then
блок операторов1
[Else
блок операторов2]
EndIf
в) Для проверки более одного условия и выполнения одного из нескольких блоков операторов используется оператор вида:
If условие 1 Then
блок операторов 1
ElseIf условие 2 Then
блок операторов 2
……………
ElseIf условие n Then
блок операторов n
[Else
блок операторов Else]
Пример:
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 (условие, значение1, значение2)
Эта функция возвращает значение1, если условие истинно и значение2, если условие ложно.
В качестве условия можно использовать логическое выражение, возвращающее значение True (Истина) или False (Ложь), или любое арифметическое выражение (нулевое значение эквивалентно False, а ненулевое – True).
Используется для проверки одного условия и выполнения одного из нескольких блоков операторов.
Формат записи оператора:
Select Case проверяемое выражение
Case список выражений 1
операторы 1
Case список выражений 2
операторы 2
Case список выражений 3
операторы 3
……………………………….
операторы группы Else
Проверяемое выражение вычисляется в начале работы оператора Select Case. Это выражение может возвращать значение любого типа (логическое, числовое, строковое).
Список выражений – одно или несколько выражений, разделенных стандартным символом –разделителем(;).
При выполнении оператора проверяется, соответствует ли хотя бы один из элементов этого списка проверяемому выражению. Эти элементы списка выражений могут иметь одну из следующих форм:
- выражение
- выражение 1 To выражение 2
- Is логический оператор(оператор сравнения) выражение
Например, Is >= 10