1.2. Структура оператора if - then
Структури IF – найефективніші із структур логічного розгалуження. Існує чотири їх різновидності:
Раніше була розглянута проста структура, де за ключовим словом THEN йшов один оператор. Ця структура називається рядковий IF.
Можуть виникнути ситуації, коли при виконанні умови, повинен виконуватися цілий блок операторів. Тоді за ключовим словом THEN йде блок операторів. END IF обумовлює кінець структури (блоку). Ця структура називається блочний IF.
Іноді у випадку, коли умова не виконується, треба виконати інший блок операторів, для цього застосовується ключове слово ELSE. END IF обумовлює кінець структури (блоку). Ця структура називається блочний IF з альтернативою.
Структура IF може передбачати перевірку декількох умов послідовно, та в залежності від їх істинності повинні виконуватися відповідні блоки. В цій структурі для кожної умови застосовується службове слово ElseIF. Ця структура називається блочний IF з перевіркою декількох умов ( та з альтернативою).
Нижче наведені можливі варіанти структур IF:
|
Блок END IF |
Блок1 Else Блок2 END IF
|
Блок1 ElseIF умова2 THEN Блок2 … Else Блок END IF |
2.Структура оператора Select Case
Структура Select Case – це особливий вигляд структури IF, що управляє.
Структура Select Case застосовується, коли одна величина бере участь у всіх логічних порівняннях і визначає коли який блок буде виконуватися.
Частіше структура Select Case використовується в тих випадках, коли порівнювання проводиться з цілим числом – селектором або індексом. Значення селектора або індексу і вибирає той блок коду, який виконуватиметься.
Синтаксис:
Select Case змінна
Case значення_1
блок операторів 1
Case значення_2
блок операторів 2
… інші варіанти
End Select
В цьому синтаксисі змінна представляє собою змінну або вираз, що порівнюється з деякою цифрою, строковим значенням, або списком значень. При виконанні оператора Select Case береться значення змінної, яке порівнюється зі списком значення_1. При збігові хоч з одним елементом списку виконується блок операторів1, при відсутності збігу управління переходить до наступного оператора Case і зміна порівнюється із значеннями наступного списку значення_2 і так далі.
Список значень може складатися з одного значення, з переліку значень розділених комою, діапазон від одного значення до іншого включно (х1 to х10), задаватись як операція порівняння у вигляді Is порівняння величини.
Приклади:
Case 25
Case 1, 2, 5
Case «+»
Case 3 to 10, 15, 20
Case 1, 5, Is>=10
Наступний алгоритм пропонує користувачеві ввести довільне число (і), у залежності від значення числа, розраховується число В,
.
Sub TheCase()
DIM і As Integer, В
і = InputBox(“Введіть число:”)
Select Case і
Case 1
B = 5*5
Case 2
B = 5-5
Case 3
B = 5/5
Case ELSE ‘Помилка
Debug.Print “Невірно зроблений вибір”
End Select
Debug.Print “Результат вибору” &Format(B,00)
End Sub