Método desmarcar (objeto de erro)

Artigo
08/25/2010

Limpa todas as configurações de propriedade do objeto Err.

object.Clear

Parâmetros

object
Sempre o Err objeto.

Comentários

Use Clear Para explicitamente o desmarcar o Err objeto após um erro foram tratado, sistema autônomo quando você usa com de tratamento de erro adiado On Error Resume Next. The Clear método é chamado automaticamente sempre que executa qualquer uma das instruções a seguir:

Qualquer tipo de Resume demonstrativo
Exit Sub, Exit Function, ou Exit Property
Any On Error demonstrativo

Any Try...Catch...Finally demonstrativo

Observação:
O On Error Resume Next construção pode ser preferível On Error GoTo Quando o tratamento de erros gerado durante o acesso a outros objetos. Verificando Err Após cada interação com um objeto remove a ambigüidade sobre qual objeto foi acessado pelo código: Você pode ter certeza de qual objeto colocado o código de erro em Err.Number, bem sistema autônomo o objeto que originalmente gerou o erro (o objeto especificado em Err.Source).

O On Error Resume Next construção pode ser preferível On Error GoTo Quando o tratamento de erros gerado durante o acesso a outros objetos. Verificando Err Após cada interação com um objeto remove a ambigüidade sobre qual objeto foi acessado pelo código: Você pode ter certeza de qual objeto colocado o código de erro em Err.Number, bem sistema autônomo o objeto que originalmente gerou o erro (o objeto especificado em Err.Source).

Exemplo

Este exemplo usa o Err objeto Clear método para reiniciar as propriedades numéricas da Err objeto para zero e suas propriedades de seqüência para seqüências de comprimento zero. Sem a telefonar para Clear, a segunda telefonar para MsgBox pode exibir a mensagem de erro mesmo.

Sub ClearErr()
  ' Produce overflow error
  On Error Resume Next
  Dim zero As Integer = 0
  Dim result As Integer = 8 / zero
  MsgBox(Err.Description)
  Err.Clear()
  MsgBox(Err.Description)
End Sub