Err 物件 (Visual Basic)

發行項
08/21/2008

更新：2007 年 11 月

包含與執行階段錯誤有關的資訊。

備註

Err 物件的屬性是由錯誤製造者 (Visual Basic、物件或程式設計人員) 所設定的。

發生執行階段錯誤時，會在 Err 物件的屬性中填入能夠明確識別錯誤的資訊，以及可用來處理錯誤或進一步了解的資訊。若要在程式碼中產生執行階段錯誤，請用 Raise 方法。

Err 物件的屬性會在錯誤處理常式內的 Exit Sub、Exit Function、Exit Property 或 Resume Next 陳述式之後，重設為零或長度為零的字串 ("")。如果使用錯誤處理常式之外任何形式的 Resume 陳述式，將無法重設 Err 物件的屬性。您可以使用 Clear 方法來明確重設 Err。

請使用 Raise 方法 (而非 Error 陳述式) 來產生系統錯誤和類別模組的執行階段錯誤。決定是否要在其他程式碼中使用 Raise 方法，可根據要傳回的資訊量而定。

Err 物件是擁有全域範圍的內建 (Intrinsic) 物件。因此您不必在程式碼中建立此物件的執行個體。

注意事項：
您也可以使用 ErrorToString 函式，尋找對應到特定錯誤代號的錯誤訊息。

範例

這個範例在建構錯誤訊息對話方塊時是使用 Err 物件的屬性。請注意，如果先使用 Clear 方法，當您使用 Raise 方法產生 Visual Basic 錯誤時，Visual Basic 的預設值會成為 Err 物件的屬性。Description 屬性會傳回描述錯誤的字串。

Dim Msg As String
' If an error occurs, construct an error message.
On Error Resume Next   ' Defer error handling.
Err.Clear()
Err.Raise(6)   ' Generate an "Overflow" error.
' Check for error, then show message.
If Err.Number <> 0 Then
  Msg = "Error # " & Str(Err.Number) & " was generated by " _
      & Err.Source & ControlChars.CrLf & Err.Description
  MsgBox(Msg, MsgBoxStyle.Information, "Error")
End If