Encerrar evento

Ocorre quando todas as referências a uma instância de um objeto são removidas da memória definindo todas as variáveis que se referem ao objeto como Nothing ou quando a última referência ao objeto sai do escopo.

Sintaxe

Subobjeto privado_Terminate( )

O espaço reservado de objeto representa uma expressão de objeto que é avaliada como um objeto na lista Aplica-se a .

Comentários

O evento Terminate ocorre depois que o objeto é descarregado. O evento Terminate não será disparado se as instâncias do UserForm ou da classe forem removidas da memória porque o aplicativo foi encerrado de forma anormal.

Por exemplo, se o aplicativo invocar a instrução End antes de remover todas as instâncias existentes da classe ou do UserForm da memória, o evento Terminate não será disparado para essa classe ou UserForm.

Exemplo

Os procedimentos de evento a seguir fazem com que um UserForm emita um bipe por alguns segundos depois que o usuário clica na área do cliente para descartar o formulário.

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

Confira também

• Eventos (Modelo de Suplemento do Visual Basic)
• Eventos (Visual Basic for Applications)

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.