Проектирование интерфейса. Объект User Form

1. Э лементы управления (ActiveX).

1.1. Добавление кнопки:

- Разработчик / Вставить 6/ Элементы ActiveX, Кнопка, режим конструктора,

- растянуть кнопку на листе,

- правой кнопкой по кнопке / Свойства:

Свойство Значение
Name (имя) cmdNumber1
Caption (заголовок) Закрыть

1. 2. Программирование кнопки:

- правой кнопкой по кнопке / Исходный текст – окно VBA,

- ввести код:

Private Sub cmdNumber1_Click() Начало процедуры для события Click – щелчок по кнопке
'Загрузка формы Комментарий
Load frmNumber1 Загрузка формы с именем Number1
frmNumber1.Show Вывод на экран формы Number1
End Sub Окончание процедуры

1.3. Пользовательские формы:

- Insert / User Form, View / Properties Window

- визуальные компоненты диалога: View / ToolBox

Визуальный компонент Назначение Префикс
Label Текстовая метка – ввод текста lbl
TextBox Тестовое поле - ввод – вывод строки текста txt
ListBox Список - выбор значения из набора lst
CheckBox, OptionButton Переключатели chk,opt
ToggleButton Кнопка – выбор значения tgb
CommandButton Командная кнопка - выполнение действия cmd
Frame Кадр - группировка элементов формы fra

1.4. Создание формы «Закрыть»:

- создать на рабочем листе командную кнопку с заголовком «Закрыть форму!», запрограммировать ее:

Private Sub cmdForm1_Click() Начало процедуры для события Click – щелчок по кнопке
'Загрузка формы Комментарий
Load Form1 Загрузка формы с именем Form1
Form1.Show Вывод на экран формы Form1
End Sub Окончание процедуры

- создать форму Form1 с текстовой меткой и командной кнопкой:

Текстовая метка:

Свойство Значение
Caption (Заголовок) Первая форма
AutoSize (Автоподбор) True
BackColor (Цвет заливки) Выбрать
Font (Шрифт) Гарнитура шрифта
ForeColor (Цвет шрифта) Выбрать
Picture (Рисунок) Выбор рисунка
TextAlign(Выравнивание текста) 2 - … Center

Командная кнопка: имя – CloseButton, заголовок – Закрыть!, изменить шрифт, заливку.

Программирование кнопки:

- открыть редактор VBA,

- ввести End между операторами:


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: