Compartilhar via


Terminar evento

Ocorre quando todas as referências a uma instância de um objeto são removidas da memória ao definir todas as variáveis que fazem referência ao objeto como Nada ou quando a última referência ao objeto fica fora do âmbito.

Sintaxe

Objeto Private Sub_Terminate( )

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

Comentários

O evento Terminar ocorre depois de o objeto ser descarregado. O evento Terminar não é acionado se as instâncias do Formulário de Utilizador ou classe forem removidas da memória porque a aplicação terminou de forma anormal.

Por exemplo, se a sua aplicação invocar a instrução End antes de remover todas as instâncias existentes da classe ou UserForm da memória, o evento Terminar não é acionado para essa classe ou UserForm.

Exemplo

Os seguintes procedimentos de evento fazem com que um UserForm apita durante alguns segundos após o utilizador clicar na área do cliente para dispensar 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

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.