ErrObject.Clear 方法

定義

命名空間:
Microsoft.VisualBasic
組件:
Microsoft.VisualBasic.dll

清除物件的所有屬性設定 Err 。

public:
 void Clear();
public void Clear();
member this.Clear : unit -> unit
Public Sub Clear ()

範例

此範例使用 Err 物件的方法 Clear ，將物件的數值屬性 Err 重置為零，並將字串屬性重置為零長度字串。 若沒有呼叫 ， Clear第二次呼叫 也會 MsgBox 顯示相同的錯誤訊息。

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

備註

在錯誤處理後，請使用Clear明確清除Err物件，例如使用延遲錯誤處理時。On Error Resume Next 當執行以下任一語句時，該 Clear 方法會自動被呼叫：

  • 任何類型的 Resume 陳述

  • Exit Sub、 Exit Function或 Exit Property

  • 任何 On Error 陳述

  • 任何 Try...Catch...Finally 陳述

    備註

    此 On Error Resume Next 結構可能比處理存取其他物件時產生錯誤更為可 On Error GoTo 取。 每次與物件互動後檢查Err，可以消除程式碼存取哪個物件的歧義：你可以確定是哪個物件將錯誤碼放進 Err.Number，以及哪個物件最初產生錯誤（該物件在 中指定）。Err.Source

適用於

另請參閱