Приведем основные общие свойства элементов управления.
Name | Имя элемента управления |
Caption | Надпись, отображаемая при элементе управления |
AutoSize | Допустимые значения: True (устанавливает режим автоматического изменения размеров элемента управления так, чтобы на нем полностью помещался текст, присвоенный свойству Caption) и False (в противном случае) |
Visible | Допустимые значения: True (элемент управления отображается во время выполнения программы) и False (в противном случае) |
Enabled | Допустимые значения: True (пользователь вручную может управлять элементом управления) и False (в противном случае) |
Height и Width | Устанавливают геометрические размеры объекта (высоту и ширину) |
Left и Top | Устанавливают координаты верхнего левого угла элемента управления, определяющие его местоположение в форме |
ControlTipText | Устанавливает текст в окне всплывающей подсказки, связанной с элементом управления. В следующем примере элементу управления CommandButton1 назначен текст всплывающей подсказки это кнопка: CommandButton1.ControlTipText = "Это кнопка" |
BackColor, ForeColor и BorderColor | Устанавливают цвет заднего и переднего плана элемента управления, также его границы |
BackStyle | Устанавливает тип заднего фона |
BorderStyle | Устанавливает тип границы. Допустимые значения: - fmBorderStyleSingle (граница в виде контура) - fmBorderStyleNone (граница невидима) |
SpecialEffect | Устанавливает тип границы. Отличается от свойства BorderStyle тем, что позволяет установить несколько типов, но одного цвета. BorderStyle позволяет установить только один тип, но различных цветов |
Picture (создание картинки) | Внедряет картинку на элемент управления. Например, на поверхности кнопки картинка отображается с помощью следующей инструкции: CommandButtonI.Picture = _ LoadPicture("с:\my doc\Kpyг.bmp") Функция LoadPicture(ПолноеИмяФайла) считывает графическое изображение. Аргумент ПолноеИмяФайла указывает полное имя графического файла |
Picture (удаление картинки) | После того как картинка создана на элементе управления, иногда возникает необходимость ее удалить. Это легко достигается присвоением свойству picture значения LoadPicture("") |
Tag | Используется для хранения дополнительной информации о форме или элементе управления, которая может быть в последующем востребована в программе. В следующем примере в пользовательской форме расположены три кнопки и одно поле. Свойство Tag каждого из этих элементов управления, за исключением второй кнопки, установлено равным Показать. Свойство Tag второй кнопки установлено равным Спрятать. В цикле проверяется свойство Tag всех элементов управления и при инициализации диалогового окна отображаются только те элементы управления, у которых это свойство равно Показать. Private Sub UserForm Initialize () Dim Элемент As Object CommandButton1.Tag = "Показать" CommandButton2. Tag = "Спрятать" CommandButton3. Tag = "Показать" TextBox1.Tag = "Показать" For Each Элемент In Controls If Элемент.Tag="Показать" Then Элемент.Visible = True Else Элемент.Visible = False End If Next Элемент End Sub |
Цвета, устанавливаемые свойствами BackColor, Forecolor и BorderColor, задаются шестнадцатеричными числами. Если эти свойства устанавливать не при помощи окна Свойства (Properties), а программно, вместо этих шестнадцатеричных чисел удобнее использовать соответствующие постоянные, задающие цвета.
Константы, задающие цвет
Константа | Значение | Цвет |
vbBlack | 0х0 | Черный |
vbRed | OxFF | Красный |
vbGreen | OxFFOO | Зеленый |
vbYellow | OxFFFF | Желтый |
vbBlue | OxFFOOOO | Синий |
vbMagenta | OxFFOOFF | Розовый |
vbCyan | OxFFFFOO | Голубой |
vbWhite | OxFFFFFF | Белый |
Соглашения об именах
При создании формы или элемента управления, VBA устанавливает свойство объекта Name (т. е. его имя) по умолчанию. Например, для первой созданной кнопки свойство Name устанавливается равным CommandButton1, для второй – CommandButton2 и т. д. При разработке приложений с одной формой имя объекта, устанавливаемое по умолчанию, обычно не вызывает никаких проблем и в этом случае имена объектов оставляют без изменения. Если приложение обладает сложной структурой и состоит из нескольких форм, будет трудно отличить первую кнопку CommandButton1 первой формы, от первой кнопки CommandButton1 второй формы. В этом случае полезно переименовать объекты так, чтобы они легче различались. Для переименования объектов и переменных в среде Windows существует соглашение об именах, называемое венгерской нотацией. Суть соглашения состоит в следующем: имя объекта начинается с короткого префикса, одинакового для объектов одного и того же рода. За префиксом следует собственно имя, отображающее суть объекта. Ниже приведены префиксы и примеры имен управляющих элементов.
Примеры префиксов и имен | ||
Управляющий элемент | Префикс | Пример имени |
TextBox | txt | txtAcount |
Label | lbl | lblInform |
CommandButton | cmd | cmdOK |
ListBox | lst | lstNames |
ComboBox | cbo | cboFirms |
ScrollBar | scr | scrDown |
SpinButton | spn | spnUp |
OptionButton | opt | optChoice |
CheckBox | chk | chkSex |
ToggleButton | Tgl | TglSwitch |
Frame | fra | fraStatus |
Image | img | imgBall |
RefEdit | ref | ref Fun |
MultiPage | mit | rnltPages |
TabStrip | tab | tabTwoTabs |
UserForm | frm | frmGame |