Офисное программирование - [9]
1) запустить редактор VBA;
2) выделить правой кнопкой мыши объект Project, выполнить команду Insert + UserForm (рис. 11), после чего появляются новая форма и панель элементов Toolbox (рис. 12).
Рис. 11. Добавление формы
Рис. 12. Новая форма
Форма как объект имеет некоторые встроенные свойства, и их можно устанавливать или программным образом, или в Properties Window (окне свойств) редактора VBA (табл. 6).
Таблица 6
Всякий раз, создавая в проекте новый объект UserForm, одновременно создается новый подкласс объекта UserForm. Любые процедуры или функции, написанные в разделе General (общий) модуля класса, относящегося к форме, становятся дополнительными методами для отдельного подкласса объекта (табл. 7).
Таблица 7
Событие – это что-то, что может произойти с диалоговым окном или элементом управления диалогового окна (табл. 8).
Событийные процедуры следует записывать в модуль класса, который является частью User Form. При этом такие процедуры должны иметь имена в виде
ObjectName_EventName,
где ObjectName – имя формы или элемента управления, a EventName – имя события, с которым идет работа. Такой формат имени позволяет VBA сопоставлять заданному событию требуемую процедуру.
Таблица 8
Объект UserForm может содержать те же элементы управления, что и находящиеся в диалоговых окнах Word, Excel или других приложений Windows (табл. 9). Элементы управления – это элементы диалогового окна, позволяющие пользователю взаимодействовать с программой. Они включают в себя кнопки-переключатели, текстовые поля, линейки прокрутки, командные кнопки и т. д.
Таблица 9
Обращение к элементам управления происходит в основном через их свойства и с помощью процедур обработки событий, написанных для каждого элемента (табл. 10).
Таблица 10
2.2. Использование форм
Используя формы, можно достаточно полно изучить возможности работы со всеми типами данных и их взаимодействия с учетом того, что значения переменных будут определяться не программно (примеры 1, 2, 3), а вводом через текстовые поля формы, т. е. при непосредственной работе пользователя с программой.
Рассмотрим создание программ, которые взаимодействуют непосредственно с создаваемыми формами и где будет использоваться весь материал, изученный в главе 1.
Пример 4. Создать форму, в которой при вводе имени в текстовое поле после нажатия кнопки ОК выдается приветственное сообщение в метку в виде: «Имя, привет! Сегодня – дата и время запуска программы».
Программа, считывая значение с текстового поля, выводит в соответствующий элемент управления данное значение и дополнительно использует функцию вывода времени и даты запуска программы.
Технология выполнения
Любая разработка программы на VBA будет сопровождаться разработкой формы, которая непосредственно связана с создаваемой программой. Поэтому на данном примере будет подробно рассмотрен порядок выполнения работы.
1-й шаг. Проектирование программы-примера
Программа-пример должна будет открывать на экране новое окно с показанным в нем приветствием, а также датой и временем (сообщением). Окно будет оставаться на экране до тех пор, пока пользователь не щелкнет на кнопке ОК.
Имея подробное описание задачи, можно определить те элементы, из которых должна состоять форма, взаимодействующая с разрабатываемой программой. По условиям примера программа имеет одно пользовательское диалоговое окно, поэтому необходимо создать одну форму (UserForm). Для формы потребуются два элемента управления – надпись для сообщения и кнопка для команды ОК. Нужно будет также создать программный код для двух процедур: одной – для надписи, в которую нужно поместить сообщение, а другой – для выхода из программы, когда пользователь щелкнет на кнопке ОК.
2-й шаг. Реализация проекта
Для выполнения данного шага выполните следующие действия.
1. Активизируйте приложение Word, сохраните документ под соответствующим именем (Время) и перейдите в редактор VBA.
2. Щелкните правой кнопкой мыши в окне проекта по пункту Project (Время), выберите пункт Insert + UserForm (появится новая форма UserForm с панелью элементов управления).
3. Расположите на форме следующие элементы: TextBox, Button1, Button2, Label1, Label2 (см. рис. 13).
Рис. 13. Форма для примера 4 в режиме конструктора
Добавление надписи в форму
Чтобы поместить надпись в пользовательскую форму, выполните следующее.
• Убедитесь, что форма активна, щелкнув по ней. Панель элементов управления видна только тогда, когда форма активна.
• Щелкните на кнопку А (метка) панели элементов управления.
• Поместите указатель мыши в форму, где необходимо расположить сообщение.
• В окне свойств (Properties – левая нижняя панель окна) выделите свойство Caption и наберите строчку «Введите имя», во второй метке данное свойство должно быть пустым, чтобы при запуске программы надпись Label2 была невидима.
