Finalizar evento

Se produce cuando todas las referencias a una instancia de un objeto se quitan de la memoria estableciendo todas las variables que hacen referencia al objeto en Nothing o cuando la última referencia al objeto sale del ámbito.

Sintaxis

Objeto Sub privado_Terminate( )

El marcador de posición de objeto representa una expresión de objeto que se evalúa como un objeto de la lista Se aplica a .

Comentarios

El evento Terminate se produce después de descargar el objeto. El evento Terminate no se desencadena si las instancias de userForm o clase se quitan de la memoria porque la aplicación finalizó de forma anómala.

Por ejemplo, si la aplicación invoca la instrucción End antes de quitar todas las instancias existentes de la clase o UserForm de la memoria, el evento Terminate no se desencadena para esa clase o UserForm.

Ejemplo

Los siguientes procedimientos de evento provocan que un UserForm haga un pitido durante unos segundos después de que el usuario haga clic en el área de cliente para descartar el formulario.

Private Sub UserForm_Activate()
    UserForm1.Caption = "Click me to kill me!"
End Sub

Private Sub UserForm_Click()
  Unload Me
End Sub

Private Sub UserForm_Terminate()
    Dim Count As Integer
    For Count = 1 To 100
        Beep
    Next
End Sub

Vea también

• Eventos (modelo de complemento de Visual Basic)
• Eventos (Visual Basic para Aplicaciones)

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.