End Sub. После появления формы на экране щелкните на ней мышью

После появления формы на экране щелкните на ней мышью,

на экране появится сообщение

· выберете событие Initialize

Private Sub UserForm_Initialize()

MsgBox ("Событие: Initialize")

End Sub

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

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

Пример 6.

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

Private Sub UserForm_Click()

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