共用方式為


終止事件

當所有指向某物件實例的引用都從記憶體中移除,將所有指向該物件的 變數 設為 Nothing 或當最後一個物件參考超出 作用域時,會發生這種情況。

語法

私人子物件_Terminate ( )

物件佔位符代表一個物件表達式,會評估到 Apply To 清單中的物件。

註解

終止事件發生在物件卸載後。 如果應用程式異常終止,UserForm類別的實例被移除,則不會觸發終止事件。

例如,如果你的應用程式在移除所有現有的類別或 UserForm 實例之前,先呼叫 End 陳述式,該類別或 UserForm 不會觸發 Terminate 事件。

範例

以下事件程序會在使用者點擊客戶端區域關閉表單後,使用者 單會發出幾秒鐘的嗶聲。

Private Sub UserForm_Activate()
    UserForm1.Caption = "Click me to kill me!"
End Sub

Private Sub UserForm_Click()
  Unload Me
End Sub

Private Sub UserForm_Terminate()
    Dim Count As Integer
    For Count = 1 To 100
        Beep
    Next
End Sub

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應