Ocurre cuando se termina una instancia de la clase asociada.

Private Sub Class_Terminate()
   instrucciones
End Sub

La parte instrucciones está formada por un número de instrucciones de código (una, varias o ninguna) que se ejecutarán cuando se inicialice la clase.

Observaciones

El siguiente ejemplo ilustra el uso del evento Terminate.

Class TestClass
   Private Sub Class_Initialize   ' Configurar evento Initialize.
      MsgBox("TestClass iniciado")
   End Sub
   Private Sub Class_Terminate   ' Establecer evento Terminate.
      MsgBox("TestClass terminado")
   End Sub
End Class
Set X = New TestClass   ' Crear una instancia de TestClass.
Set X = Nothing   ' Destruir la instancia.

Requisitos

Versión 5

Consulte también

Objeto Class | Instrucción Class | Evento Initialize

Se aplica a: Objeto Class