Реферат: Access і Visual basic for Application. Excel VBA: прийоми програмування

If Поліна = "Ж" Then

Поздоровлення = "З 8 березня!"

End if

Якщо умова, задана виразом між ключовими словами If і Then виконується, дотримуються інструкції усередині блоку, обмеженого ключовими словами Then і End if. Інакше оператори між ключовими словами не виконуються, а ACCESS перейде до обробки оператора, який слідує за ключовими слова End if. У разі потреби провести дві різні дії (одне при дотриманні умови, а друге - ні), доцільно скористатися повною формою оператора If:

If вираз Then

Оператор1

Else

Оператор2

End if

Якщо умова дотримується, виконується Оператор1 (або група операторів, розташованих між ключовими словами Then і Else, а якщо не дотримується - Оператор2 (або група операторів, розташованих між ключовими словами Else і End if.

Проте, не завжди можливі два варіанти рішення. Враховуючи це, VBA надає в розпорядження користувачів оператора Select Case, призначеного для вибору одного з множин варіантів рішень:

Select Case Місто

Case "Київ"

Код_МГТС = "044"

Case "Москва"

Код_МГТС = "095"

Case "Запоріжжя"

Код_МГТС = "061-2"

Case Else

Print "Я не знаю такого міста!"

End Select

При виконанні цього оператора перевіряється значення змінної Місто. Залежно від результату перевірки змінної Код_МГТС привласнюється телефонною код деякого міста. Якщо значення змінної Місто не співпадає ні з одним із значень, перерахованих в рядках з ключовим словом Case, проводиться дія, вказаною між ключовими словами Case Else і End Select.

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

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

For Лічильник = 1 To 10

Print Лічильник

Next Лічильник

Цикл по лічильнику обмежується ключовими словами For і Next. Після ключового слова For указується ім'я змінної, яка виконуватиме роль лічильника, після знаку рівності - початкове значення лічильника , а після ключового слова To - кінцеве значення лічильника .

Ще один різновид циклу - While-цикл. Умова виконання команд усередині такого циклу визначається деяким умовним оператором:

Do While Лічильник <> 10