Terminate 事件

當物件實例的所有參考都從記憶體中移除時發生，方法是將參照物件的所有 變數 設定為 Nothing ，或當對象的最後一個參考超出 範圍時。

語法

Private Sub物件_Terminate ( )

物件佔位元代表評估為 [套用至] 列表中對象的物件表達式。

註解

Terminate 事件會在卸除對象之後發生。 如果因為應用程式異常終止而從記憶體中移除UserForm或類別的實例，則不會觸發Terminate事件。

例如，如果您的應用程式在從記憶體中移除類別或UserForm的所有現有實例之前叫用End語句，則不會針對該類別或UserForm觸發 Terminate 事件。

範例

下列事件過程會在使用者按兩下用戶端區域關閉表單之後，讓 UserForm 出現幾秒鐘的嗶聲。

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

另請參閱

• Visual Basic Add-In 模型 () 的事件
• Visual Basic for Applications) (事件

支援和意見反應

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