Розміщення процедури у файлі стандартного модуля (файлі bas)

Якщо процедура повинна входити до складу універсального модуля, вона визначається у Вікні програмного коду для цього модуля. Для відкриття цього вікна потрібно проробити наступне.

Насамперед необхідно створити стандартний (універсальний) модуль, точніше, додати новий модуль у Ваш проект.

Це робиться за допомогою команди Add Module меню Project Головної панелі проекту. При цьому з'являється панель, верхня частина якої показана на мал. 1.5.

Мал. 1.5. Діалогове вікна для додавання в проект нового стандартного модуля

Ви можете використовувати закладку Existing, щоб додати до Вашого проекту будь-який вже існуючий файл із розширенням bas, або використовувати закладку New, щоб створити новий такий файл, де буде знаходитися створювана Вами процедура. Обравши друге, Ви повинні натиснути кнопку Відкрити, після чого з'явиться чисте вікно програмного коду. У це вікно Ви можете звичайним способом вписати Ваше визначення процедури чи функції (мал. 1.6) (у це вікно Ви можете вписати не одне, а кілька визначень різних процедур і функцій, усі вони будуть поміщені в один файл із розширенням bas.).

Мал. 1.6. Вікно програмного коду для створення модуля із вписаним у нього визначенням процедури Площа Трикутника

Після цього у вікні провідника проекту з'явиться інформація про знов створений модуль (мал.1.7).

Мал. 1.7. Вікно провідника проекту після створення модуля, що містить визначення процедури ПлощаТрикутника

Для збереження Вашого модуля у вигляді файлу з розширенням bas Ви повинні зробити ще одне: при збереженні Вашого проекту (за допомогою команди Save Project опції File) на питання середовища Visual Basic Ви повинні привласнити модулю яке-небудь ім'я.

На мал. 1.8 приведений приклад збереження тільки що створеного Вами модуля, що містить визначення процедури ПлощаТрикутника. Йому Ви привласнили ім'я ПлощаТрикутника М. (Ви бачите, що в папці Samples, куди Ви вирішили помістити новий модуль, уже є один файл із розширенням bas — файл з ім'ям Module 1.)

Мал. 1.8. Приклад збереження файлу ПлощаТрикутникаМ.basстандартного модуля, що містить процедуру ПлощаТрикутника

На цьому процес розміщення Вашої процедури у файлі стандартного модуля буде закінчений. Вікно провідника проекту набуде вигляду, що показаний на мал. 1.9.

Мал. 1.9. Вікно провідника проекту після збереження універсального модуля (файлу ПлощаТрикутникаМ.bas)

Ви можете зробити ще одне виправлення, що наведе у Вашому проекті остаточний порядок — привласнити ім'я Вашому модулю (не плутайте ім'я модуля з ім'ям файлу цього модуля, що Ви вже створили, — див. мал. 1.8).

Для цього Ви повинні клацнути мишею рядок, виділений на мал. 1.9, і у Вікні властивостей, що з'явилося, (мал. 1.10) змінити значення єдиної властивості (Name) модуля на те ім'я, що Вам подобається.

Мал. 1.10. Вікно властивостей об'єкта Module l з єдиною властивістю (Name)

Питання для роздумів

1. Чи має сенс помістити процедури ПлощаТрикутника і МаксІМінЗТрьох у файли універсальних модулів?

2. Як Ви думаєте, чи можна внести виправлення чи доповнення у файл універсального модуля, знаходячись у середовищі проектування Visual Basic?

3. Як Ви думаєте, чи можна викликати процедуру, що визначена в модулі екранної форми Form l, з модуля іншої екранної форми Form 2?

4. Як Ви думаєте, що відбудеться, якщо спробувати помістити у файл універсального модуля не глобальну, а локальну процедуру?
Відповідь: Процедура буде благополучно поміщена в цей файл, але при спробі її використовувати в іншому модулі буде видане повідомлення про помилку (мал. 1.11).