4. Умовні оператори

Умовні оператори використовуються в програмах для керування кодом виконання програми в залежності від значення умови, яка перевіряється. Результатом перевірки умови є значення TRUE або FALSE. І це значення може бути збережено у змінних типу Variant або Boolean. IF <умова> THEN <дія> (IF passw="100" THEN Load.Form). Якщо дія включає декілька операторів, тоді після THEN відбувається перехід на наступний рядок

IF passw="100" THEN

Load.Form1

Form1.show

End IF

У випадку коли дія повинна виконуватися при значенні умови FALSE використ. оператор

IF not passw="100" THEN

MsgBox "Пароль невірний"

Якщо умовний оператор має декілька умов, він наз. складним умовним оператором і має вигляд:

IF <умова1> THEN

<дія1>

ELSE IF <умова2> THEN

<дія2>

ELSE

<дія3>

End If.

5. Оператори цикла

Цикли типу For … Next. Такий тип циклів має у своїй конструкції змінний лічильник, значення для змінних лічильника в процесі використання циклу і кінцевого значення.

For < змінна = початкове значення >

то < кінцеве значення > [ Step <число>]

<група операторів>

Цикл використовується до тих пір поки поточне значення змінної лічильника буде дорівнювати кінцевому значенню.

Step – це те число, яке додається до змінної лічильника ( не обов´язково, якщо він відсутній значення змінюється на одиницю)

CLS

FOR I=1 TO IS step 3

PRINT I & “*****”

IF I=10 THEN EXIT FOR

NEXT

6.Створення меню

Меню створюється за допомогою редактора меню (MENU EDITOR) Який дозволяє додавати,вилучати, коректувати існуючі пункти меню, створювати нові пункти, додавати гарячі клавіші для виконання пунктів меню.

Гарячі клавіші CTRL+D

Пр. Створення меню для вибору варіантів перегляду данних:

Активують кнопку MENU EDITOR на панелі інструментів STANDART

CAPTION: визначають назву пункту меню

NAME: визначають ім´я, яке буде використовуватись в программі (програмні оператори)

кн.

NEXT: створення нового пункту меню

INSERT: додавання нового пункту меню у існуючий

DELETE: вилучення

Кнопки стрілки – для зміни рівня іерархії

Для створення гарячих клавіш – в полі CAPTION ДОДАТИ СИМВОЛ ПЕРЕД ТІЄЮ ЛІТЕРОЮ ЯКУ БУДУТЬ АКТИВУВАТИ (&) CTRL+B

1 Заповнюємо поле CAPTION (вибір).

2 NAME : mnu Case

кн. NEXT

Треба змінити рівень іерархії. Для створення вбудованної командної ’’кнопки’’ аналогічно створюємо всі пункти меню:

CAPTION NAME

Дата час mnu Date

День mnu Day

Час mnu Time

Рік mnu Year

Для виводу значень у формі створуємо об´єкт

LABEL Alignment (z-center)

Border Style (1 – Fixed Singl)

Caption – (пусто)

Font – Ms`Sans Serif Bold 16 point

Для додавання програмних операторів => кл. на Label, або кн. Code.

Щоб автоматично з`явились оператори треба із переліку об`єктів форми у списку верхньої частини вікна Code вибрати необхіний об`єкт

Private Sub mnu Date_Click ()

Label 1. Caption =Now

End Sub

Потім Private Sub mnu Day_Click ()

Label 1. Caption = Day (Date)

End Sub

Private Sub mnu Time_Click ()

Label 1. Caption=Hour (Time)

End Sub

Private Sub mnu Year_Click ()

Label 1. Caption=Year(Date)

End Sub