Область действия

Вместо оператора Dim при описании переменных могут также использоваться сле­дующие операторы, задающие область действия переменных:

Public — для глобальных переменных;

Private — для локальных переменных модуля;

Static — переменная, сохраняющая свое значение между вызовами модуля.

Переменные, описанные с помощью оператора Dim внутри функции (это процедура, начинающаяся ключевым словом Function и заканчивающаяся ключевым словом End Function) или подпрограммы (процедура, начинающаяся ключевым словом Sub и заканчивающаяся ключевым словом End Sub), являются локальными внутри этой процедуры.

Константы

Если переменная является константой, при ее описании используется ключевое слово Const, например:

Public Const cMsize As Integer =6

Отображение диалогового окна

Для отображения диалогового окна загруженной формы используется метод Show, для скрытия — метод Hide или Unload.

Пример. Создать небольшое приложение, которое открывает диалоговое окно и запрашивает в нем количество и начальный радиус. Затем оно строит в точке, которую отдельно укажет пользователь, заданное количество концентрических окружностей с пропорционально увеличивающимися радиусами.

Выполнение. После добавления к проекту новой формы с помощью кнопки панели Standard (Стандартная) среды VBA создается пустая форма (рис.4).

Рис. 4 . Окно формы.

Одновременно с созданием окна новой формы в окне среды разработки VBA появ­ляется панель Toolbox (Элементы управления), на которой располо­жены элементы управления. Любой элемент управления можно выбрать и перета­щить на форму. Местоположение элемента и его размеры изменяются мышью.

На рис.5 показан пример простой формы с шестью элементами управления: две надписи, два текстовых поля и две кнопки.

Рис.5. Окно заполненной формы

Для изменения названия диалогового окна или надписей в этом окне следует ис­пользовать окно Properties (Свойства) (рис.4), в котором необходимо редактировать текущее значение свойства Caption выбранного объекта (формы в целом или элемента управления).

Модуль программного кода

Для ввода текста головной программы добавим к форме, приведенной на рис. 5, модуль кода с помощью кнопки. В проводнике проекта в ветви Modules должен появиться элемент Module1.

Будем хранить значение начального радиуса окружности в глобальной переменной Radius, а количество создаваемых окружностей — в глобальной переменной NumCir. Для этого в модуль Module1 добавим строки, приведенные в листинге 1.

Листинг 1. Объявление глобальных переменных

Public Radius As Double

Public NumCir As Integer

Назовем макрос, который будет выполняться в нашем проекте, Ncircles. Для этого с помощью кнопки добавим к модулю Module1 процедуру, являющуюся голов­ной программой (макросом). Система откроет диалоговое окно Add Procedure (До­бавление процедуры) (рис. 6), в котором необходимо ввести имя Ncircles и за­дать тип (Sub и Public).

Рис. 6. Диалоговое окно Add Procedure

Добавим к модулю Module1 текст макроса Ncircles, приведенный в листинге 2.