ErrObject.Clear 方法

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物件。

另請參閱

• Err()
• ErrorToString()
• On Error 陳述式 (Visual Basic)