Самоучитель 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



    Белый






    Содержание раздела