Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Создание пользовательских п ÒÉÌÏÖÅÎÉÊ ÓÒÅÄÓÔÁÍ...doc
Скачиваний:
6
Добавлен:
18.11.2019
Размер:
2.02 Mб
Скачать

Объекты UserForm и Controls

Все формы конкретного приложения составляют коллекцию UserForms, которая обладает свойствами и методами, присущими любой коллекции, например, Count, Item, Add. Программным способом всегда можно добавить новую форму или изменить свойства любой формы коллекции.

Все элементы управления формы составляют коллекцию Controls. Каждый элемент управления имеет индекс в этой коллекции, определяемый порядком возникновения элемента в форме. Элемент управления каждого типа обладает собственными свойствами, методами и событиями.

В таблице рассмотрены некоторые наиболее употребительные методы объекта UserForm и свойства элементов управления, присущие многим из них (общие свойства).

Некоторые свойства и методы формы и объектов формы

Метод или свойство

Комментарии

Примеры

Метод Hide

Скрытие формы

Userform1.Hide Me.Hide

Форма не видна на экране, но остается загруженной в память. Переменные, определенные на уровне модуля, не теряют своих значений

Метод Load

Загрузка формы

Load Userform1

Форма загружается в память, но не высвечивается на экране

Метод Repaint

Высвечивание модифицированного изображения формы

Userform1.Repaint Me.Repaint

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

Метод Show

Высвечивание формы

Userform1.Show

Если форма спрятана, то она высвечивается. Если форма не загружена, то она загружается и высвечивается

Метод UnLoad

Выгрузка формы

UnLoad Userform1 UnLoad Me

Форма выгружается из памяти, значения переменных теряются

Метод SetFocus

Установка фокуса на элементе управления

CommandButton1.SetFocus

Свойства BackColor, ForeColor, BorderColor

Цвет фона объекта, цвет переднего плана объекта (цвет текста), цвет рамки (границы) объекта

Userform1.BackColor=RGB(255,0,0)

Userform1.BackColor = vbRed

Userform1.ForeColor = vbWhite

Userform1. BorderColor=vbBlack

Определяют внешний вид объекта. Цвет можно выбрать визуально из таблицы цветов, можно задавать программно, используя функцию RGB или константы VBA, которые присваивают свойству целое число, соответствующее выбранному цвету

Свойство Caption

Надпись объекта

Frame1.Caption = "Up_Down"

Высвечивается в заголовке формы или на объекте формы

Свойство ControlSource

Установка свойства Value элемента управления равным значению указанной ячейки

TextBox1.ControlSource="Лист1!A5"

Cвязывает значение элемента управления с ячейкой рабочего листа

Свойство ControlTipText

Короткая подсказка по элементу формы

Frame1.ControlTipText = "Вперед или Назад"

Определяет краткий текст, который появится на экране рядом с объектом при наведении курсора на объект

Свойство Enabled

Доступность элемента во время выполнения формы

CommandButton1.Enabled=False

Определяет, может ли элемент управления оказаться в фокусе (стать доступным) в результате действий пользователя:

  • True (по умолчанию) делает элемент доступным;

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

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

Свойство Font

Шрифт

watch.Font.Bold=True

Шрифт определяет характеристику текста, высвечиваемого в элементе управления. Нажатие на кнопку при визуальном задании этого свойства вызывает стандартный диалог изменения типа, размера и начертания шрифта.

При использовании в процедуре свойство Font возвращает объект Font, свойства которого можно установить программно

Cвойства Height, Width

Размеры объекта на экране

Userform1.Height=200

Textbox1.Width=400

Устанавливают размер формы или элемента управления. Единица измерения – точка

Свойства Left, Top

Определяют расположение объекта в форме или формы на экране

CheckBox1.Left=20

CheckBox1.Top=50

Свойства задают координаты левого верхнего угла элемента управления относительно левого верхнего угла контейнера – элемента, в который вложен данный. Единица измерения – точка. Контейнером, как правило, является сама форма

Свойство Name

Имя (идентификатор) объекта

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

Свойство RowSource

Установка значений элементов списка

ListBox1.RowSource="MySheet!A15:C43"

Cвязывает список с ячейками рабочего листа

Свойство TabIndex

Индекс элемента

CommandButton1.TabIndex=1

Определяет порядковый номер элемента управления при обходе всех элементов с помощью клавиши Tab. Нумерация элементов начинается с 0. Максимальное значение этого свойства равно количеству элементов управления минус единица

Свойство Value

Значение элемента управления.

Определяет состояние элемента управления или его содержимое. Для разных элементов управления свойство может принимать различные значения:

TextBox1.Value="Введите текст"

If CheckBox1.Value=True Then TextBox1.BackColor=RGB(255,0,0) Else TextBox1.BackColor=RGB(0,255,0)

  • для CheckBox, OptionButton, ToggleButton это значения Null, True и False;

  • для ComboBox, ListBox это значение, которое находится в связанном столбце выбранной строки списка. Связанный столбец определяется свойством BoundColumn;

  • для CommandButton значение всегда False. Если программно установить Value = True, это вызовет событие Click для кнопки.

  • для TextBox это текст, введенный в поле. Совпадает со свойством Text.

В списках, допускающих множественный выбор, свойство Value не применяется

Свойство Visible

Скрытие или высвечивание элемента управления

CommandButton1.Visible=False

Принимает значения True или False. По умолчанию True, т.е. элемент виден на экране