ErrObject.Clear Método

public:
 void Clear();

public void Clear ();

member this.Clear : unit -> unit

Public Sub Clear ()

Exemplos

Este exemplo usa o Err método do Clear objeto para redefinir as propriedades numéricas do Err objeto para zero e suas propriedades de cadeia de caracteres para cadeias de caracteres de comprimento zero. Sem a chamada para Clear, a segunda chamada para MsgBox exibiria a mesma mensagem de erro.

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

Comentários

Use Clear para limpar explicitamente o Err objeto após um erro ter sido tratado, como quando você usa tratamento de erro adiado com On Error Resume Next. O Clear método é chamado automaticamente sempre que qualquer uma das seguintes instruções é executada:

• Qualquer tipo de instrução Resume

• Exit Sub, Exit Function ou Exit Property

• Qualquer On Error instrução

• Qualquer Try...Catch...Finally instrução

  Observação

  O constructo On Error Resume Next pode ser preferível a On Error GoTo ao manipular erros gerados durante o acesso a outros objetos. A verificação Err após cada interação com um objeto remove a ambiguidade sobre qual objeto foi acessado pelo código: você pode ter certeza de qual objeto colocou o código de erro em Err.Number, bem como qual objeto gerou originalmente o erro (o objeto especificado em Err.Source).

Confira também

• Err()
• ErrorToString()
• Instrução On Error (Visual Basic)