умовного переходу виконує певні дії в залежності від значення умови. Синтаксис оператора умовного переходу наступний:
Коротка форма
If «умова» Then «оператор»
Або
If «умова» Then
«оператор»
End If
Дослівно: «Якщо умова істинно, то виконати « оператор ».
Приклад:
If (N gt;=10) and (M lt;=20) Then Print «Інтервал»
Повна форма
If «умова» Then
«оператор 1»
Else «оператор 2» If
Дослівно: «Якщо умова істинно, то виконати« оператор 1 », інакше виконувати« оператор 2 »».
Приклад:
If d gt; 0 Then x=а + bPrint «Рішення немає» If
Якщо при перевірці умови повинні виконуватися відразу кілька операторів, то умовний оператор записується в блоковій формі:
If «умова» Then
«оператор 1»
«оператор 2»
...... .If
Або
If lt; умова gt; Then
«Група операторів 1»
«Група операторів 2» If
Допускаються багаторазово вкладені конструкції If then Else, мають стільки рівнів вкладення, скільки необхідно. Однак замість багаторазово вкладених конструкцій If then Else в деяких випадках зручніше використовувати оператор вибору.
Оператор вибору. Якщо є декілька операторів, які необхідно виконати у разі істинності деякого умови, то конструкція If then Else може бути дуже громіздкою. Оператор вибору Select Case призначається альтернативою умовному операторові і дозволяє виконати кілька варіантів вибору, в цьому випадку оператор Select Case оцінює вираз тільки один раз - на початку керуючої структури - і виконує вибір гілки з набору умов. Синтаксис оператора вибору наступний:
Select Case «Мінлива або вираз»
Case «A1»
«оператори 1»
Case «A2»
«оператори 2»
.......
Case «An»
«оператори n»
Case Else
«оператори»
End Select
Управління переходить до тієї рядку, для якої значення Аi збігається зі значенням «змінної або вираження». Якщо «змінна або вираз» містить значення А1 , розташоване по порядку після першого ключового слова Case , то в цьому випадки виконуються « оператори 1 ». Якщо «змінна або вираз» не дорівнює жодному з значень А1, А2, ..., Аn , то виконується « інакше ». Якщо при декількох значеннях Аi необхідно виконати один (одні) і той же оператор, то список повинен бути записаний через кому.
Приклад:
Case «A2, A2, A2,»
«оператори 2»
Приклад:
Select Case B122=y +21, 3, 5=1012=12Select
Приклад:
Select Case Mes12, 1, 2. Text= зима 3, 4, 5. Text= весна 6, 7, 8. Text= літо 9, 10, 11. Text= осінь Else. Caption= номер установлено невірно Select
Таким чином, кожна конструкція Case може містити кілька значень, діапазон значень або комбінацію значень і операторів порівнянь. Необов'язкова конструкція Case Else виконується, якщо оператор вибору не знаходить відповідного значення ні в одному з Case.
Приклад 3 . Обчислити
де.
Рішення. Робота виконується в наступній послідовності:
1. Запустити VISUAL BASIC. У вікні New Project вибрати Стандартний.EXE вкладки New (новий) і клікнути на кнопку « Відкрити ».
. На екрані з'явиться новий проект і форма Project1 - Form1 (Form) , зміст якої потрібно заповнити необхідними компонентами, за допомогою яких можна буде виконати необхідні обчислення.
. По-перше, необхідні елементи, які будуть використовуватися для введення даних m і n. Використовуємо для цієї мети елементи Text1 і Text2 . По-друге, необхідні елементи, в яких будуть відображені результати обчислення x, y. Використовуємо для цієї мети елементи Text3 , Text4 .
. Для оформлення написів для позначення текстових вікон Text1 , Text2 і Text3 можна викорис...
