УМОВНІ ОПЕРАТОРИ
ФУНКЦІЇ ДЛЯ РОБОТИ З РЯДКОВИМИ ЗМІННИМИ
Фунція | Дія | Приклад |
Ucase | Переводить усі символи рядка у верхній регістр | Ucase("Ivanenko") - IVANENKO |
Lcase | Переводить усі символи рядка в нижній регістр | Lease("Ivanenko") — ivanenko |
Len | Визначає довжину рядка | Lеn("Ivanenko") — 8 |
Right | Повертає задане число символів, починаючи від кінця рядка | Right("Ivanenko", 2)—"ko" |
Left | Повертає задане число символів, починаючи від початку рядка | Left("Ivanenko", 4)—"Ivan" |
Mid | Повертає задане число символів, починаючи від указаної позиції | Mid("Ivanenko", 2, З) — "van" |
String | Повторює вказаний символ — установлену кількість разів. | String(4, "$"} — $$$$ |
Умовні оператори застосовуються в програмах для управління виконанням дій залеж- но від результату перевірки заданої умови. Результатом перевірки умови може бути значен- ня True(істина) або False(хибність). Відповідно ці значення можуть бути збережені в змін- них типу Variantабо Boolean.
В умовних виразах використовуються такі оператори:
Оператор | Значення |
> | Більше |
<= | Менше або дорівнює |
>= | Більше або дорівнює |
= | Дорівнює |
<> | Не дорівнює |
тина).
Оператор If. Існує простий тип умовного оператора
If <умова> Then <дія>
У такому операторі <дія> виконується лише тоді, коли значенням <умова> є True (іс-
Наприклад, при правильному пинкоді з'являється повідомлення
If pinkod ="666" Then MsgBox ("Пинкод — правильний!").
Оператор може також складатися з кількох рядків, тоді після слова Then відбувається
перехід на наступний рядок і кінцевим є оператор End If. Наприклад: If pinkod ="666' Then
MsgBox ("Пинкод — правильний!") End If
Якщо умова має значення False(хибність), то виконується оператор, розташований після умовного оператора (або блока операторів).
У випадку, коли дія має виконуватися при значенні умови False, використовують оператор Not. Наприклад, при будь-якому неправильному паролі на екрані дисплея з'яв- ляється повідомлення, і програма закінчує свою роботу:
If Not pinkod ='121" Then
MsgBox ("Пинкод — неправильний!") End
End If
Умовний оператор може мати кілька умов для перевірки значень, тоді він є складним умовним оператором і має такий вигляд:
If <умова 1> Then
<дія 1> — виконується, коли значення умови 1 — True; ElseIf <умова 2> Then
<дія 2> — виконується, коли значення умови 2 — True; Else
<дія 3> — виконується, коли значення умови 1 та умови 2 — False, тобто в усіх інших випадках;
End if
У наведеному нижче прикладі залежно від значення змінної VKladвиконуються такі дії (змінна VKladоголошена як Integer):
If VKlad < О Then
MsgBox ("Зверніться, будь ласка, до кредитного відділу ")
Elself VKlad >1000 Then MsgBox ("12 % річних ") Else
MsgBox ("Ми не маємо можливості Вас обслужити ") End If
В умовних операторах для зв'язування кількох умов використовуються такі ключові
слова:
Ключові слова | Дії |
And | Якщо обидві умови мають значення True,то й результат перевірки умов має значення True |
Or | Якщо одна із умов має значення True,то й результат пе- ревірки умов має значення True |
Приклад 1: 1 < x < 10 — (1 < x) AND (x < 10 ).
x < 0
Приклад 2 :
x > 1000
— (x < 0) OR (x > 1000 ).
Побудова умовних виразів за допомогою операторів Select Case.Більш наочною і зручною є структура Select Case. Ці вирази дають змогу виконувати вибір із кількох фраг- ментів програми залежно від значення умовного виразу або змінної. Загальний вигляд стру- ктури Select Caseтакий:
Select Case <змінна> Case <значення 1> програмні оператори 1
Case <значення 2>
програмні оператори 2
................... Case Else
програмні оператори З
End Select
У такій структурі завжди виконується лише одна група програмних операторів, при- чому параметри Змінната Значенняповинні мати однаковий тип. Параметр Значеннямо- же бути:
• оператором порівняння, наприклад Case X < 2;
• числом (змінною) — Case 3;
• списком значень — Case 2,4,6;
• діапазоном значень — Case 5 То 10.
Нехай, наприклад, залежно від значення X розраховується Y. Тоді маємо таку струк-
туру Select Case:
Select Case X
Case 5 то 10 ' значення X від 5 до 10
Y = X*2
Case Is = 100 ' значення X дорівнює 100
У = X/2
Case Is > 500 ' значення X більше 500
Y = X^(1/2)
Case Else ' в інших випадках
Y = X
End Select
Оператор Case Else передає управління групі операторів тоді, коли жодна умова у створеній структурі Select Case не може бути виконана.