啟動、停用事件
Activate 事件會在對象變成活動窗口時發生。 當物件不再是活動視窗時,就會發生 Deactivate 事件。
語法
Private Sub物件_Activate ( )
Private Sub物件_Deactivate ( )
物件佔位元代表評估為 [套用至] 列表中對象的物件表達式。
註解
在程式代碼中使用 Show 方法,即可讓物件變成作用中。
只有當對象可見時,才會發生 Activate 事件。 除非您使用 Show 方法,否則無法看見載入 Load 的 UserForm。
只有當您在應用程式內移動焦點時,才會發生 Activate 和Deactivate 事件。 將焦點移入或移出另一個應用程式中的物件,並不會觸發任一事件。
卸除物件時不會發生 Deactivate 事件。
範例
下列程式代碼使用兩個 UserForms:UserForm1 和 UserForm2。 將這些程式複製到 UserForm1 模組,然後新增 UserForm2。 UserForm1 的 標題 會在其 Activate 事件過程中建立。 當使用者按兩下 UserForm1 的用戶端區域時,會載入 UserForm2 並顯示觸發 UserForm1 的 Deactivate 事件,並變更其標題。
' 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 支援與意見反應。