Information.Err 方法

定义

命名空间:
Microsoft.VisualBasic
程序集:
Microsoft.VisualBasic.Core.dll
程序集:
Microsoft.VisualBasic.dll
Source:
Information.vb
Source:
Information.vb
Source:
Information.vb
Source:
Information.vb
Source:
Information.vb

包含有关运行时错误的信息。

public:
 static Microsoft::VisualBasic::ErrObject ^ Err();
public static Microsoft.VisualBasic.ErrObject Err();
static member Err : unit -> Microsoft.VisualBasic.ErrObject
Public Function Err () As ErrObject

返回

ErrObject

包含有关运行时错误的信息。

示例

此示例使用对象的属性 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

注解

Err 对象的属性由错误生成器设置 - Visual Basic、对象或程序员。

发生运行时错误时，对象的属性 Err 将填充唯一标识该错误的信息，以及可用于处理错误的信息。 若要在代码中生成运行时错误，请使用 Raise 该方法。

对象的Err属性在错误处理例程中的 、Exit Sub、Exit Function或语句之后Exit Property重置为零或Resume Next零长度字符串（“”）。 在错误处理例程之外使用任何形式的 Resume 语句不会重置 Err 对象的属性。 可以使用该方法 Clear 显式重置 Err。

Raise使用该方法而不是Error语句为系统错误和类模块生成运行时错误。 决定是否在其他代码中使用 Raise 该方法取决于要返回的信息丰富性。

该 Err 对象是具有全局范围的固有对象。 因此，无需在代码中创建它的实例。

适用于

另请参阅