Terminate イベント
関連付けられたクラスのインスタンスが終了したときに発生します。
Private Sub Class_Terminate()
statements
End Sub
statements は、クラスが初期化されるときに実行される 0 個以上のステートメントを表します。
解説
次のコードは、Terminate イベントの使用例です。
Class TestClass
Private Sub Class_Initialize ' Initialize イベントを設定します。
MsgBox("TestClass started")
End Sub
Private Sub Class_Terminate ' Terminate イベントを設定します。
MsgBox("TestClass terminated")
End Sub
End Class
Set X = New TestClass ' TestClass のインスタンスを作成します。
Set X = Nothing ' インスタンスを破棄します。
必要条件
参照
Class オブジェクト | Class ステートメント | Initialize イベント
対象: Class オブジェクト