Приклад розробки інтерфейсної частини проекту в vba.

Для розробки проекту "Мій перший додаток" необхідно виконати таку послідовність дій:

1. Для роботи в програмному середовищі VBA можна скористатися будь-яким додатком Microsoft Office і сполученням клавіш <Alt + F11> відкрити середовище програмування. При використанні VB після запуску програми варто виконати команду Файл – Новый проект. Можливо, Visual Basic запропонує зберегти зміни в проекті, з яким працював користувач. Треба або відмовитися від збереження кнопкою "Нет", або зберегти проект, натиснувши кнопку "Да".

2. Якщо вікно макета форми на екрані відсутнє, його варто додати командою UserForm меню Insert.

3. Клацанням правою кнопкою миші на формі у вікні макета необхідно визвати контекстно-залежне меню й з нього вибрати команду Properties. У вікні властивостей, що з'являється, потрібно встановити значення CenterScreen властивості StartupPosition для того, щоб розташувати форму в центрі екрану.

4. Буксируванням краю форми змінюються її розміри. В завершеному варіанті розміри форми приблизно 12 см завширшки й 18 см у висоту або приблизно 460 і 360 пунктів відповідно (властивість Width = 460, а властивість Height = 360).

5. Для виділення форми необхідно клацнути на ній мишею. Про те, що виділено саме форму, а не один з розміщених на ній елементів, можна судити по вмісту вікна властивостей і по маркерах у кутах форми й на її сторонах. Якщо вікно властивостей відсутнє на екрані, натисніть клавішу <F4>.

6. Для форми необхідно задати значення двох властивостей, наприклад: а) властивості Name задати значення FrmПривітання; б) властивості Caption задати значення Мій перший додаток. Автор ... (після слова "Автор" рекомендовано вказати своє прізвище).

Текст, якому встановлено властивості Caption, буде виведений у заголовку форми. За допомогою важливої властивості Name (це програмне ім'я форми) будуть робитися посилання на форму в програмі. Ім'я FrmПривітання інформативно, тому доцільно цим ім'ям замінити UserForm1, що встановлюється за допомогою властивості Name системою за замовчуванням. Те ж відноситься й до властивості Caption, що змінена на Мій перший додаток. Автор Петренко.

7. Клацання на елементі Label (напис) на панелі елементів управління забезпечує створення напису на формі.

Буксируванням варто змінити розміри області напису так, щоб у ній містився текст "Привіт майбутнім фахівцям", і розмістити напис по центру форми у її верхній частині (рис. 5.7).

Властивості Name варто задати значення LblПривіт1, а властивості Caption – Привіт майбутнім фахівцям.

Примітка. Для створення елемента напису на формі замість подвійного клацання можна активізувати клацанням кнопку Label, у результаті чого курсор миші прийме вигляд хрестика, за допомогою якого в потрібному місці форми виділяється область для цього елемента управління.

8. У властивостях ForeColor і BackColor у вкладці Palette варто встановити колір таким чином, щоб у проектованій формі текст напису "Привіт майбутнім фахівцям" відображався малиновим або синім кольором на бірюзовому фоні.

Рис. 5.7. Вікно форми

9. Необхідно сформувати програмний код так, щоб при його виконанні, яке пов'язанє з клацанням по напису "Привіт майбутнім фахівцям", його малиновий (синій) колір змінювався на червоний.

Для цього необхідно двічі клацнути в області напису "Привіт майбутнім фахівцям". Подвійне клацання по елементу управління (або формі) відкриває вікно програмного коду з шаблоном процедури Private Sub LblПривіт1_Click(), який означає таке: приватна підпрограма (процедура), що буде виконана при клацанні по елементу управління з програмним ім'ям LblПривіт1.

Після заголовку оформлюється тіло процедури у вигляді сукупності необхідних операторів. Наприклад, якщо потрібно змінити колір шрифту в цьому написі, то в тіло процедури варто записати оператор LblПривіт1.ForeColor = vbRed (рис. 5.8).

Рис. 5.8. Код програми зміни кольору напису

10. Необхідно клацнути один раз на елементі управління Label (напис) і перемістити курсор миші на форму. Курсор миші змінить свій вид і прийме вид "+".

Потрібно установити курсор у тому місці, де буде перебувати верхній лівий кут елемента. Натиснувши ліву кнопку миші й, утримуючи її, курсор перетягується до того місця, де буде перебувати правий нижній кут елемента, що створюється. При цьому буде показано прямокутний контур. На формі з'явиться область, для якої необхідно задати наступне: властивості Name значення LblПривіт2, а властивості Caption – Ваш ... (... – це ім'я користувача або інший текст).

11. У властивості ForeColor на вкладці Palette варто установити колір таким чином, щоб у формі яка проектується текст напису Ваш ... відображався зеленим кольором, а властивості BackColor задати жовтий колір.

12. Пропонується передбачити, щоб при виконанні програми колір напису Ваш ... змінювався на синій. Для цього необхідно виконати дії, які описані в п. 9, однак у коді потрібно вказати LblПривіт2.ForeColor = vbBlue (рис. 5.9).

Рис. 5.9. Код програми зміни кольору напису

13. Для додавання рисунку або фотографії на форму використовуються елемент управління Image і його властивість Picture.

14. Під час виконання програми при натисканні на рисунок можливе його зникнання. Для цього в коді необхідно змінити значення властивості Visible (воно може приймати значення True або False).

15. Потрібно створити на формі кнопку CommandButton та перемістити її в нижню ліву частину вікна форми. Крім того потрібно задати такі властивості:

властивості Name – СmdВихід;

властивості Caption – &Вихід.

Властивість Caption визначає текст, що відображається на кнопці. Символ & (амперсант) перед першим символом означає, що кнопку можна активізувати не тільки клацанням по ній, але й з клавіатури (у цьому випадку сукупність клавіш <Alt + В>). Такі скорочення варто призначати по мнемонічному принципу (наприклад, літера "В" для кнопки Вихід).

16. При подвійному клацанні на кнопці СmdВихід відкривається вікно редактора коду з шаблоном процедури. Для кнопки стандартним є подія Click. Тому на екрані відображається шаблон процедури Private Sub СmdВихід_Click().

17. Уведіть між рядками Private Sub і End Sub такий фрагмент програми (рис. 5.10):

Рис. 5.10. Код програми створеного додатка

Коли користувач клацне по кнопці &Вихід, відбувається подія СmdВихід_Click().

18. При розробці проекту в програмному середовищі Visual Basic необхідно зберегти у вигляді файлів усі його компоненти. Для цього виконується команда File – Save Form As…, в якій слід ввести ім'я форми FrmПривітання.frm, а потім ім'я проекту FrmПривітання.vbp.

При розробці проекту в VBA він зберігається разом з документом як макрос.

19. При виконанні команди Run Sub/UserForm на екрані з'являється форма з повідомленням "Привіт майбутнім фахівцям" (рис. 5.11).

20. Завершення роботи проекту пов’язане з клацанням по кнопці &Вихід.

21. Для самостійного відпрацювання отриманих знань та навичок пропонується розмістити на формі додаткові елементи управління і визначити необхідні властивості та їх значення. За вибором студента потрібно написати і виконати додаткові процедури.

Рис. 5.11. Зовнішній вигляд форми після виконання програми