Initialize Event


Private Sub Class_Initialize() statements End Sub

The statements part consists of zero or more code statements to be run when the class is initialized.

The following example illustrates the use of the Initialize event.

	Copy Code
Class TestClass Private Sub Class_Initialize ' Setup Initialize event. MsgBox("TestClass started") End Sub Private Sub Class_Terminate ' Setup Terminate event. MsgBox("TestClass terminated") End Sub End Class Set X = New TestClass ' Create an instance of TestClass. Set X = Nothing ' Destroy the instance.

Copy Code

Class TestClass
   Private Sub Class_Initialize   ' Setup Initialize event.
      MsgBox("TestClass started")
   End Sub
   Private Sub Class_Terminate   ' Setup Terminate event.
      MsgBox("TestClass terminated")
   End Sub
End Class
Set X = New TestClass   ' Create an instance of TestClass.
Set X = Nothing   ' Destroy the instance.

Version 5

Applies To: Class Object

Reference

Class Statement (VBScript)
Terminate Event

Concepts

Class Object

Remarks

Requirements

See Also

Reference

Concepts

Send Help Center Feedback