Initialize イベント

関連付けられたクラスのインスタンスが作成されたときに発生します。

Private Sub Class_Initialize()
   statements
End Sub

statements は、クラスが初期化されるときに実行される 0 個以上のステートメントを表します。

解説

次のコードは、Initialize イベントの使用例です。

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 ステートメント | Terminate イベント

対象: Class オブジェクト