L'événement Initialize se produit lorsqu'une instance de la classe associée est créée, alors que l'événement Terminate intervient lors de son terme.
Private Sub Class_Initialize() 'instructions... End Sub Private Sub Class_Terminate() 'instructions... End Sub
Les deux procédures permettent de capturer leur événement respectif, et subséquemment, d'exécuter les instructions contenues.
Exemple :Class TestClass
'Configuration de l'événement Initialize.
Private Sub Class_Initialize
MsgBox("Classe_de_test démarré")
End Sub
'Configuration de l'événement Terminate.
Private Sub Class_Terminate
MsgBox("Classe_de_test terminé")
End Sub
End Class
'Création d'une instance de Classe_de_test.
Set X = New Classe_de_test
'Destruction de l'instance.
Set X = Nothing