Самоучитель VBA

Общие свойства элементов управления



Общие свойства элементов управления


Приведем основные общие свойства элементов управления.



Name

Имя элемента управления

Caption

Надпись, отображаемая при элементе управления

AutoSize

Допустимые значения: True (устанавливает режим автоматического изменения размеров элемента управления так, чтобы на нем полностью помещался текст, присвоенный свойству Caption) и False (в противном случае)

Visible

Допустимые значения: True (элемент управления отображается во время выполнения программы) и False (в противном случае)

Enabled

Допустимые значения: True (пользователь вручную может управлять элементом управления) и False (в противном случае)

Height И Width

Устанавливают геометрические размеры объекта (высоту и ширину)

Left И Top

Устанавливают координаты верхнего левого угла элемента управления, определяющие его местоположение в форме

ControlTipText

Устанавливает текст в окне всплывающей подсказки, связанной с элементом управления. В следующем примере элементу управления CommandButtonl назначен текст всплывающей подсказки Это кнопка :

CommandButtonl . ControlTipText = "Это кнопка"

BackColor, ForeColor и BorderColor

Устанавливают цвет заднего и переднего плана элемента управления, также его границы

BackStyle

Устанавливает тип заднего фона

BorderStyle

Устанавливает тип границы. Допустимые значения:

  • fmBorderStyieSingle (граница в виде контура)
  • fmBorderStyieNone (граница невидима)

SpecialEf feet

Устанавливает тип границы. Отличается от свойства BorderStyle тем, что позволяет установить несколько типов, но одного цвета. BorderStyle позволяет установить только один тип, но различных цветов

Picture (создание картинки)

Внедряет картинку на элемент управления. Например, на поверхности кнопки картинка отображается с помощью следующей инструкции:

CommandButtonl . Picture = LoadPicture ( "с : \my doc\Kpyr . bmp" )

Функция LoadPicture (ПолноеИмяФайла) считывает графическое изображение. Аргумент ПолноеИмяФайла указывает полное имя графического файла

Picture (удаление картинки)

После того как картинка создана на элементе управления, иногда возникает необходимость ее удалить. Это легко достигается присвоением свойству Picture значения LoadPicture ("")

Tag

Используется для хранения дополнительной информации о форме или элементе управления, которая может быть в последующем востребована в программе. В следующем примере в пользовательской форме расположены три кнопки и одно поле. Свойство Tag каждого из этих элементов управления, за исключением второй
кнопки , установлено равным Показать. свойство Tag второй кнопки установлено равным спрятать. В цикле проверяется свойство Tag всех элементов управления и при инициализации диалогового окна отображаются только те элементы управления, у которых это свойство равно Показать . Private Sub UserForm Initialize)) Dim Элемент As Object CommandButtonl .Tag = "Показать"

ControlTipText

Устанавливает текст в окне всплывающей подсказки, связанной с элементом управления. В следующем примере элементу управления CommandButton1 назначен текст всплывающей подсказки это кнопка :

CommandButton1 .ControlTipText = "Это кнопка"

BackColor, ForeColor и BorderColor

Устанавливают цвет заднего и переднего плана элемента управления, также его границы

BackStyle

Устанавливает тип заднего фона

BorderStyle

Устанавливает тип границы. Допустимые значения:

  • fmBorderStyleSingle (граница в виде контура)
  • fmBorderstyieNone (граница невидима)

SpecialEf feet

Устанавливает тип границы. Отличается, от свойства BorderStyle тем, что позволяет установить несколько типов, но одного цвета. BorderStyle позволяет установить только один тип, но различных цветов

Picture

(создание картинки)

Внедряет картинку на элемент управления. Например, на поверхности кнопки картинка отображается с помощью следующей инструкции:

CommandButtoni . Picture = LoadPicture ( "с : \my doc\Kpyr . bmp" ) Функция LoadPicture (ПолноеИмяФайла) считывает графическое изображение. Аргумент ПолноеИмяФайла указывает полное имя графического файла

Picture

(удаление картинки)

После того как картинка создана на элементе управления, иногда возникает необходимость ее удалить. Это легко достигается присвоением свойству picture значения LoadPicture ("")

Tag

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

Private Sub UserForm Initialize ()

Dim Элемент As Object CommandButton1 . Tag = "Показать"

CommandButton2 .Tag = "Спрятать"

CommandButton3 .Tag = "Показать"

TextBoxl.Tag = "Показать"

For Each Элемент In Controls

If Элемент . Tag = "Показать" Then Элемент. Visible = True

Else Элемент .Visible = False

End If Next Элемент End Sub

Цвета, устанавливаемые свойствами BackColor, ForeColor и BorderColor, задаются шестнадцатеричными числами. Если эти свойства устанавливать не при помощи окна Свойства (Properties), а программно, вместо этих шестна-дцатеричных чисел удобнее использовать соответствующие постоянные, задающие цвета (табл. 7.2).

Таблица 7.2. Константы, задающие цвет

Константа

Значение

Цвет

vbBlack

0x0

Черный

vbRed

0xFF

Красный

vbGreen

0xFF00

Зеленый

vb Yellow

0xFFFF

Желтый

vbBlue

0xFF0000

Синий

vbMagenta

0xFF00FF

Розойый

vbCyan

0xFFFF00

Голубой

vbWhite

0xFFFFFF

Белый



Содержание  Назад  Вперед