End Sub. На экране появится сообщение, а при закрытии окна – появится форма.

На экране появится сообщение, а при закрытии окна – появится форма.

Событие Initialize можно использовать при первой загрузке формы для установки каких-либо свойств формы и ее элементов управления.

Пример 6.

Создайте форму, изменяющую фон цвета на событие Click

Private Sub UserForm_Click()

UserForm1.BackColor = RGB(100, 100, 200)

End Sub

В этом примере для установки свойства формы BackColor используется функция RGB, которая возвращает RGB-значение типа Long.

Синтаксис функции:

RGB(red, green, blue),

где именованные аргументы Red, Green, Blue – обязательные типа Variant (Integer) - это числа в диапазоне 0–255, представляющие красный, зеленый и синий компоненты цвета.

Сначала будет выведена форма вида 1, а после щелчка мыши по форме – вида 2.

Выберете событие Initialize