Шаг 58.
VBA в MSExcel. Элементы управления и пользовательская форма. Общие свойства элементов управления

    На этом шаге мы перечислим некоторые общие свойства элементов управления.

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

Таблица 1. Общие свойства элементов управления
Свойство Назначение
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 (создание картинки) Внедряет картинку на элемент управления. Например, на поверхности кнопки картинка отображается с помощью следующей инструкции:
  CommandButton1.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 = "Показать" 
    TextBox1.Tag = "Показать"
    For Each Элемент In Controls 
      If Элемент.Tag = "Показать" Then 
        Элемент.Visible = True 
      Else 
        Элемент.Visible = False 
      End If 
    Next Элемент 
  End Sub

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

Таблица 2. Константы, задающие цвет
Константа Значение Цвет
vbBlack 0x0 Черный
vbRed 0xFF Красный
vbGreen 0xFF00 Зеленый
vbYellow 0xFFFF Желтый
vbBlue 0xFF0000 Синий
vbMagenta 0xFF00FF Розовый
vbCyan 0xFFFF00 Голубой
vbWhite 0xFFFFFF Белый

    На следующем шаге мы рассмотрим соглашения об именах.




Предыдущий шаг Содержание Следующий шаг