Создание формы и размещение в ней элементов управления
Чтобы добавить форму в проект, щелкните правой кнопкой мыши на соответствующем проекте. Затем выберите в раскрывающемся контекстном меню команду InsertUserForm. После этого появится изображение формы.
Объектная модель библиотеки объектов Ms Forms
В данной обектной модели можно выделить три типа объектов:
Элементы управления (Controls). К ним относятся такие объекты, как TextBox (Текстовое поле), ComboBox (Поле со списком), Label (Надпись) и т.п.
Объекты, содержащие в себе коллекции (Collections). Это объекты MultiPage и TabStrip, содержащие соответственно коллекции Pages и Tabs.
Объекты, являющиеся членами соответствующих коллекций. Например, объекты Page и Tab являются объектами, входящими в состав соответствующих коллекций Pages и Tabs.
Основные свойства формы.
Свойство Caption определяет заголовок окна формы. Значением данного свойства может быть любая строка.
Свойство ShowModal при задании ему значения True позволяет сделать форму модальной. Пока модальная Фома открыта, другие окна приложения недоступны, хотя отображаются на экране.
Свойство ScrollBars определяет, какие полосы прокрутки присутствуют на экране. Значение данного свойства может равняться значению одной из следующих констант:
fmScrollBarsNone – полосы прокрутки отсутствуют;
fmScrollBarsHorizontal - присутствует только горизонтальная полоса прокрутки;
fmScrollBarsVertical – присутствует только вертикальная полоса прокрутки;
fmScrollBarsBoth – присутствуют обе полосы прокрутки;
Все открытые формы являются членами коллекции UserForms. Если открыто несколько форм, то, чтобы сослаться на конкретную форму, можно использовать ее порядковый номер в коллекции. Чтобы сослаться на первую открытую форму, можно добавить в программу следующую инструкцию:
UserForms.Item(0)
Рис. 8.1. Объектная модель библиотеки объектов Ms Forms
Для ссылки на форму по имени достаточно указать ее имя:
UserForm1.Height = 300
В данном примере мы задаем высоту (Height) формы с именем UserForm1.
Коллекция UserForms, как и большинство других коллекций, также имеет метод Add, который
позволяет добавить новую форму.
Основные элементы управления
Элемент управления Label (Надпись) отображает текст. Обычно надписи отображают на формах справочную информацию. Например, рядом с полем можно разместить надпись с текстом, поясняющую назначение данного поля.
Элемент управления TextBox(Поле) обычно служит для ввода данных пользователем. В текстовом поле можно ввести любой текст.
К основным свойствам текстового поля относятся: Text, Value, MultiLine.
Свойство Text определяет текст в текстовом поле. Значением данного свойства может быть строковое выражение.
Элемент управления RadioButton (Переключатель) имеет два состояния: включено и выключено. Переключатели объединяются в группы, причем включен может быть только один переключатель в группе.
Элемент управления CheckBox(Флажок) позволяет установить одно из состояний: включено или выключено.
Элемент управления List Box( Список) используется в том случае, когда необходим выбор одного или нескольких вариантов из списка. Список может иметь несколько столбцов, если задать соответствующие значения свойству ColumnCount.
Для добавления в список нового элемента следует использовать метод AddItem. В случае если список состоит из нескольких строк, то к нему будет добавлена новая строка.
Синтаксис:
Objekt.AddItem [ Item [,Index]]
Пример процедуры, в которой выполняется добавление элементов в список.
Private Sub UserForm_Activate()
ListBox1.AddItem(”Item1”)
ListBox1.AddItem(”Item2”)
ListBox1.AddItem(”Item3”)
End Sub
Таблица 8.2
|
Элемент |
Описание |
|
Object |
Объектная переменная одного из следующих типов:ComboBox или ListBox |
|
Item |
Определяет элемент или строку списка, которая будет добавлена. Например первого элемента списка или строки соответствует 0, второго -1 и т.д. |
|
Index |
Определяет позицию добавляемого элемента в списке. Значением данного свойства может быть целое число, которое не должно превышать число элементов управления |
Элемент управления ComboBox
Объединяет в себе два элемента управления: TextBox(Поле) и ListBox(Список). Иногда данный элемент управления также называют комбинированным списком. Комбинированному списку присущи свойства как текстового поля, так и списка.
Элементы управления CommandButton (Кнопка)
Применяются обычно для выполнения какого-либо действия. Так, при нажатии на кнопку может открываться другая форма, выполняться какие-либо действия. Так, при нажатии на кнопку может открываться другая форма, выполняться какие-нибудь расчеты и т.д.
Как правило, в процедуру обработки события Click данной кнопки вставляются инструкции, выполняющие необходимые действия.
Для иллюстрации возможностей использования элемента управления CommandButton (Кнопка) вернемся к приведенному ранее примеру со списком. Вместо того чтобы поместить инструкции, добавляющие элементы списка в процедуру обработки события Click кнопки, как показано ниже:
Private Sub CommandButton1_Click()
ListBox1.AddItem(”Item1”)
ListBox1.AddItem(”Item2”)
ListBox1.AddItem(”Item3”)
End Sub
Элементы управления Scroll Bar.
С помощью элемента управления ScrollBar (Полоса прокрутки) можно задать значение свойств другого элемента управления, например, текстового поля.
Private Sub ScrollBar1_Change()
TextBox1.Text=ScrollBar1.Value
End Sub
В приведенном примере изменение положения бегунка полосы прокрутки приводит к изменению значения, отображаемого в текстовом поле. Создана процедура обработки события Change.
В этой процедуре значению свойства Text элемента управления TextBox (Поле) с именем TextBox1 присваивается значение свойства Value, Полосы прокрутки (ScrollBar) с именем ScrollBar1.