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      ' インスタンスを破棄します。

必要条件

バージョン 5

参照

Class オブジェクト | Class ステートメント | Initialize イベント

対象: Class オブジェクト