Активация, деактивация событий
Событие Activate возникает, когда объект становится активным окном. Событие Деактивация возникает, когда объект больше не является активным окном.
Синтаксис
Частныйобъект Sub_Activate( )
Частныйобъект Sub_Deactivate( )
Заполнитель объекта представляет выражение объекта , которое вычисляет объект в списке Применимо к .
Замечания
Объект может стать активным с помощью метода Show в коде.
Событие Activate может возникать только в том случае, если объект виден. Пользовательская форма, загруженная с помощью load, не отображается, если вы не используете метод Show.
События Активация и Деактивация происходят только при перемещении фокуса в приложении. Так, ни одно из этих событий не срабатывает при переходе к объекту (или из объекта) другого приложения.
Событие Деактивация не возникает при выгрузке объекта.
Пример
В приведенном ниже коде обрабатываются две формы UserForm: UserForm1 и UserForm2. Скопируйте эти процедуры в модуль UserForm1 и добавьте UserForm2. Подпись UserForm1 создается в процедуре активации события. Когда пользователь щелкает клиентскую область UserForm1, загружается userForm2 и отображается активация события деактивации UserForm1, изменяя его субтитры.
' Activate event for UserForm1
Private Sub UserForm_Activate()
UserForm1.Caption = "Click my client area"
End Sub
' Click event for UserForm1
Private Sub UserForm_Click()
Load UserForm2
UserForm2.StartUpPosition = 3
UserForm2.Show
End Sub
' Deactivate event for UserForm1
Private Sub UserForm_Deactivate()
UserForm1.Caption = "I just lost the focus!"
UserForm2.Caption = "Focus just left UserForm1 and came to me"
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.