Пользовательская форма UserForm
Пользовательская форма UserForm предоставляет пользователю возможнсть создавать диалоговые окна разрабатываемых приложений. Она служит базой пользовательского диалогового окна, на которой в зависимости от решаемой задачи размещают требуемые элементы управления.
Семейство UserForms является семейством, компоненты которого представляют все загруженные формы UserForm в приложении. Как и все семейства, UserForms имеет свойства Count (возвращает число компонентов в семействе) и Item (возвращает определенный компонент семейства), а также метод Add (добавляет к семейству новый компонент).
Приведем основные свойства, методы и события пользовательской формы.
Наиболее часто используемые свойства объекта UserForm.
|
Name |
Возвращает имя пользовательской формы |
|
Caption |
Возвращает текст, отображаемый в строке заголовка д формы |
|
BackColor |
Возвращает цвет фона формы |
|
BorderStyle |
Устанавливает тип границы |
|
Picture |
Указывает рисунок, отображаемый как фон формы |
|
Left И Top |
Возвращают местоположение верхнего левого угла формы в пунктах |
|
Height И Width |
Возвращают высоту и ширину формы в пунктах |
|
StartUpPosition |
Возвращает значение, определяющее положение формы при ее первом отображении на экране. Допустимые значения: -Manual (начальное значение не устанавливается), -СenterOwner (выравнивание по центру объекта, к которому принадлежит форма) CenterScreen (выравнивание по центру экрана) Windows Default (положение верхнего левого угла экрана) |
Наиболее часто используемые методы объекта UserForm. Основные события объекта UserForm.
|
Show |
Отображает форму на экране |
|
Hide |
Закрывает форму |
|
Move |
Изменяет положение и размер формы |
|
PrintForm |
Печатает изображение формы |
|
Initilize |
Происходит при отображении формы на экране |
|
Terminate |
Происходит при закрытии формы |
Семейство Controls
Доступ к семейству всех элементов управления, расположенных в пользовательской форме UserForm, осуществляется с помощью семейства Controls. Например, чтобы скрыть все элементы управления формы UserForm, можно использовать код, в котором свойству Visible элемента управления, определяющему, отображается ли этот элемент на экране или нет, устанавливается значение False:
For Each Элемент in UserFormI.Controls
Элемент.Visible = False
Next Control
Создание пользовательской формы
Обсудим процесс создания пользовательской формы на примере конструирования простейшего диалогового окна.
|
Шаг1 |
Выберите команду Сервис, Макрос, Редактор Visual Basic (Tools, Macro, Visual Basic) для того, чтобы перейти в редактор Visual Basic. | |
|
Шаг 2 |
Выберите команду Вставить User Form (Insert UserForm). В редакторе Visual Basic появятся: -Окно с пользовательской формой -Панель инструментов Панель элементов (Toolbox) (рис. ). |
Рис.7.1 Окно редактора Visual Basic с пользовательской формой и панелью элементов
|
ШагЗ |
И
|
|
Шаг 4 |
Для того чтобы написать процедуру обработки события нажатия кнопки Первый акт, дважды щелкните ее. Активизируется модуль UserForm1, в который введите процедуру: Private Sub CommandButton1 Click () TextBox1.Text = "Воробышек за бабочкой прыг-прыг-прыг" End Sub Для обработки событий нажатий кнопок Второй акт и Третий акт в модуле UserForm1 введите следующие две процедуры: Private Sub ConmmandButton2 Click "() TextBoxl.Text = "Воробышек за бабочкой скок-скок-скок" End Sub Private Sub CommandButton3 Click() TextBoxl.Text = "Воробышек бабочку ням-ням-ням" End Sub |
|
Шаг 5 |
П
|
Рис.7.2 Редактор Visual Basic с преобразованной пользовательской формой для создаваемого приложения
Рис.7.3 Диалоговое окно Песнь о воробушке и бабочке