ErrObject 模块 (Visual Basic)
更新：2007 年 11 月
ErrObject 模块包含用于使用 Err 对象标识和处理运行时错误的属性和过程。
备注
ErrObject 模块支持 Err 对象。有关更多信息，请参见 Err 对象 (Visual Basic)。
成员
|
|
示例
本示例在构造错误消息对话框时使用了 Err 对象的属性。请注意，如果首先使用 Clear 方法，则使用 Raise 方法生成 Visual Basic 错误时，Visual Basic 的默认值将成为 Err 对象的属性。
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