Создание форм.

Весьма вероятно, что в проекте VBA потребуется создать собственную форму. Например, может понадобиться задать значения параметров перед выполнением некоторой операции, либо потребуется запросить подтверждение на выполнение определенного действия.

В VBA формы можно создать самостоятельно. Форма - это то же самое, что и любое диалоговое окно в Windows 98 (NT). Единственное различие заключается в том, что имеется возможность задать внешний вид такого окна, а так же указать, для чего оно предназначено.

В проект можно добавить произвольное число форм. Чтобы добавить форму в проект, выполните следующую последовательность действий:

1. Если одновременно открыто несколько проектов, выберите имя проекта, в который требуется добавить форму, в окне проекта.

2. Выберите команду главного меню Вставка/UserForm. Выводится пустая форма и панель элементов управления.

3. В меню редактора VBA выберите команду Вид/Окно свойств. Выводится окно свойств.

4. Задайте свойства новой формы, например, ее имя (свойство Name).

Панель элементов управления позволяет разместить ряд элементов управления в форме. Хотя набор инструментов отображается автоматически при создании формы, может понадобиться скрыть его, чтобы освободить место на экране. Для вывода панели элементов выберите команду Вид/Панель элементов.

Если вы выполните всю приведенную выше последовательность действий, окно VBA будет иметь вид, как на рис. 5.2.

Размещение элементов управления в форме

Чтобы разместить все необходимые элементы управления в форме, выполните следующую последовательность действий:

1. Выберите форму, в которую требуется добавить элементы управления. При необходимости выведите набор инструментов.

2. Н ажмите на панели инструментов кнопку требуемого элемента, а затем щелкните по любому месту формы. В форме выводится элемент управления.

Рис. 5.2

3. Перетащите элемент управления в требуемую позицию.

4. Измените размеры элемента управления, перетащив его рамку. То же самое можно сделать и с формой.

Использование полей. Элемент управления TextBox (Поле) позволяет ввести в форму информацию, которую затем можно использовать в программе. Кроме того, с помощью этого объекта имеется возможность вывести данные.

После создания элемента управления лучше сразу присвоить ему новое имя (свойство Name). Если не указать название поля, то используется имя, заданное по умолчанию.

Для установки и получения содержимого поля используется свойство Value. Данное свойство имеет тип Variant. Приведем фрагмент, в котором в поле TxtControl заносится значение "abcdef":

TxtControl.Value = "abcdef"

В следующем фрагменте в поле заносится число 100:

TxtControl.Text = 100

Для получения значения элемента управления TextBox можно использовать следующий фрагмент:

Dim varResult As Variant

varResult = txtControl.Value

Использование надписей. Элемент управления Label (Надпись) используется для вывода текста в форме. Наиболее важным свойством является Caption, содержащее текст надписи. Свойство Caption можно задать в окне свойств, а так же в тексте программы:

labControl.Caption = "Адрес"

Использование кнопок. Элемент управления CommandButton (Кнопка) инициирует выполнение некоторого действия. С помощью свойства Caption имеется возможность задать текст, который выводится на кнопке.

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

Использование переключателей. Элемент управления OptionButton (Переключатель) используется для предоставления выбора одного варианта из многих. На заданный момент в группе может быть выбран только один переключатель. Отмена выбора одного переключателя при выборе другого происходит автоматически.

Для определения выбранного переключателя используется свойство Value. Если значение данного свойства равно True, значит данный переключатель включен, если False - значит выключен.

Кроме перечисленных, существуют и другие элементы управления. Исчерпывающую информацию по ним можно получить в справочной системе по VBA.

После размещения, выравнивания и задания размеров и свойств элементов управления форма выглядит весьма привлекательно. Однако это не имеет значения, если с элементами управления не связано никакого кода.

Рассмотрим примеры ситуаций, в которых обязательно нужно написать код для формы:

• Запуск выполнения определенной задачи при нажатии кнопки;

• Запоминание выделенного элемента в списке;

• Отмена доступа к элементу управления, например, если выбран переключатель, который запрещает изменение значения в этом элементе.

В VBA очень просто связать объект в форме с кодом. Для выполнения данной операции выполните одно из следующих действий:

• Дважды щелкните по элементу управления в форме. Появляется окно модуля для выбранного объекта. Выберите событие, для которого требуется создать процедуру обработки, в списке, расположенном в верхнем правом углу окна модуля. Введите текст процедуры. Для перехода к другому объекту выберите этот элемент управления в списке, расположенном в верхнем левом углу окна модуля.

• Щелкните по элементу управления и выберите команду Вид/Программа в меню редактора VBA.

Часто при разработке формы требуется посмотреть на ее внешний вид. По мере разработки формы, ее можно просматривать. Для этого необходимо открыть форму и либо нажать клавишу <F5>, либо воспользоваться командой Запуск\Запуск подпрограммы/ формы.