Приклад розроблення форми засобами vba Анкета студента.
ЕТАПИ РОЗРОБКИ ДОДАТКУ:
розробка інтерфейсу користувача;
введення тексту програмного коду процедур подій;
виконання проекту;
збереження проекту як незалежного додатку.
Розробка інтерфейсу користувача.
Розробимо форму з назвою Анкета.
1.Завантажимо VBA. Створемо форму Insert – UserForm.
2. Поміняемо колір фону форми(BackColor) і дамо назву Анкета (Caption).
3. Вставимо у форму текстове поле (об'єкт типу Label) з текстом "Анкета студента".
Задамо значення властивості AutoSize цього об'єкту True і властивості Font (шрифт) цього поля такі:
Font : Times New Roman Cyr (або MS Sans Serif);
Font style : Bold; : 14;
Задайте колір підпису, вказавши значення властивості ForeColor.
Рис.4.1.8. Рис.4.1.9.
4. Аналогічно вставляемо у форму ще декілька текстових полів з біографічними даними.
Один з варіантів розміщення текстових полів показаний на рис.4.1.9.
5. Вставимо у форму об'єкт типу Image (малюнок) художню і портретну форографії.
Для цього клацніть один раз лівій клавішею миші на піктограмі Image - палітри компонентів і, наприклад, в нижньому правому кутку форми обведіть контур майбутнього зображення (фотографії). У разі потреби поміняйте розмір форми або вставленого об'єкту і добийтеся якнайкращого розташування на ній створених раніше об'єктів. Міняти розміри об'єкту можна методом їх "розтягання" за маркери (чорні габаритні квадратики). За умовчанням цьому об'єкту буде привласнено стандартне ім'я Imagel.
Нехай портретна фотографія має назву Imagel,а художня фотографія Image2.
6. Задамоо значення False властивості Visible для обох зображень.
7. Вставимо у форму кнопки для почергового відображення фотографій - два об'єкти типу CommandButton з іменами Соmmandl і Command2.
Піктограма об'єкту типу CommandButton (кнопка) знаходиться на палітрі компонентів Visual Basic. Зробіть підписи на кнопках (властивість Caption) "Портретна фотографія" і "Художня фотографія" відповідно. Виберіть якнайкращий, на ваш розсуд шрифт для підписів кнопок. Якщо ви використовуєте картинки із стандартної бібліотеки Clipart, виберіть для кнопок цікаві підписи. Один з варіантів розташування кнопок показаний на рис.4.1.11.
Рис 4.1.10 Рис 4.1.11.
8. Запрограмуйте кнопку "Портретна фотографія" так, щоб після натиснення на неї у формі з'являлася портретна фотографія.
Для програмування кнопки Commandl необхідно двічі клацнути на ній лівій клавішею миші. В результаті активізується вікно тексту програми із заготівкою процедури CommandlClick, яка оброблятиме подію клацання на кнопці Command 1:
Private Sub Commandl_Click()
...
End Sub
У заготівку необхідно вставити текст програми реакції на цю подію. Процедура матиме такий вигляд:
Private Sub Commandl_Click()
Imagel.Visible = True
'Портретна фотографія стає видимою
Image2.Visible = False
'Художня фотографія стає невидимою
End Sub
За допомогою даної процедури властивість видимості об'єкту Imagel включаємо, і цією ж властивість об'єкт Image2 вимикаємо. Для кнопки "Художня фотографія" дії будуть протилежні. Зверніть увагу на використання складених імен типу Imagel.Visible, у яких ім'я об'єкту від його властивості відділяється крапкою. Такі складені імена дають доступ до значення конкретної властивості об'єкту. Після введення з клавіатури точки Visual Basic пропонує програмісту список властивостей, методів і подій для даного об'єкту. Вибір потрібної властивості здійснюється клавішами із стрілками, а підтвердження - пропуском. Крім того, ім'я потрібної властивості або методу можна безпосередньо набрати на клавіатурі.
9. Запрограмуйте кнопку "Художня фотографія" відповідно її призначенню (див. пункт 8).
Текст процедури для цієї кнопки матиме вигляд:
Private Sub Command2_Click()
Imagel.Visible = False
'Портретна фотографія стає невидимою
Image2.Visible = True
'Художня фотографія стає видимою
End Sub
10.Запускаємо програму і переконуємося, що кнопки виконують свої функції. Закрийте вікно програми "Анкета студента" і виходимо з VBA.