Err
含有关于运行时错误的信息。接受用于生成和清除运行时错误的 Raise 和 Clear 方法。
说明
Err 对象是一个具有全局范围 —的固有对象:不必在您的代码中创建它的示例。Err的属性被一个错误 —的生成器设置:Visual Basic,自动对象,或 VBScript 程序。
Err 对象的默认属性是 number。Err.Number 含有一个整数,且可由 Automation 对象使用以返回 SCODE。
当发生运行时错误时,Err 的属性由标识错误的唯一信息以及可用于处理它的信息填充。要在代码中生成运行时错误,请用 Raise 方法。
Err 对象属性被重新设置为零或零长度字符串 ("")。Clear 方法可被用于显式地重新设置 Err。
下面的示例说明了 Err 对象的用法:
On Error Resume Next
Err.Raise 6 '产生溢出错误。
MsgBox ("Error # " CStr(Err.Number) " " Err.Description)
Err.Clear '清除错误。
Err对象是一个具有全局范围的内部对象,含有关于错误的所有信息。
On Error Resume next 忽略运行时产生的所有错误
On Error Goto 0 取消忽略错误措施
主要方法有:Clear、Raise
主要属性有:Description、HelpContext、HelpFile、Number、Source
其属性及方法的详细说明见下面的示例说明:
Err对象的方法
Clear
描述:清空Err对象当前所有的属性,也就是清空错误
语法:Err.Clear
示例:
On Error Resume next '忽略运行时产生的所有错误
MsgBox 5/0
MsgBox Err.Number '输出错误的数值
Err.Clear '清空所有的错误信息
MsgBox Err.Number '输出0
Raise
描述:定义一个运行时的错误
语法:Err.Raise(number,source,description,helpfile,helpcontent)
参数:Number:用于标记错误号
Source 标记产生错误的对象或者应用程序名称
Description:关于错误的描述信息
Helpfile:help文件的有效路径
Helpcontent:help文件的主题
示例:
On Error Resume Next
Err.Raise 22,"VBS脚本","溢出啦","c:\test.txt" '定义一个运行时的错误
MsgBox "错误:" vbCrLf _
"Number:" Err.Number vbCrLf _
"Source:" Err.Source vbCrLf _
"Description:" Err.Description vbCrLf _
"Helpfile:" Err.HelpFile
Err.Clear '清除错误
Err对象的属性
Description
描述:返回或者设置Error的描述
语法:Description(conid)
示例:
Desc = Err.Description '返回Error的描述信息
Err.Description = "类型不匹配" '设置Error的描述信息
HelpContext
描述:返回或者设置指定帮助信息的主题
语法:HelpContext(string)
示例:
HelpContext = Err. HelpContext '返回Error的帮助主题
Err. HelpContext = "类型不匹配" '设置Error的帮助主题
HelpFile
描述:返回或者设置help文件的地址
语法:HelpFile(FilePath)
示例:
HelpFile = Err. HelpFile '返回HelpFile的地址
Err. HelpFile = "c:\test.txt" '设置HelpFile的地址
Number
描述:返回或者设置一个表示错误的数值
语法:Number(errid)
示例:
Number = Err. Number '返回Error的id
Err. Number = "c:\test.txt" '设置Error的id
Source
描述:返回或者设置报告错误的对象(或者应用程序的名称)
语法:Source(string)
示例:
Source = Err. Source '返回Error的对象或者应用程序名称
Err. Source = "box" '设置Error的对象或者应用程序名称