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
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.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的描述信息
Err.Description=”类型不匹配” ‘设置Error的描述信息
HelpContext
描述：返回或者设置指定帮助信息的主题
语法：HelpContext(string)
示例：
HelpContext=Err. HelpContext ‘返回Error的帮助主题
Err. HelpContext=”类型不匹配” ‘设置Error的帮助主题
Err. HelpContext=”类型不匹配” ‘设置Error的帮助主题
HelpFile
描述：返回或者设置help文件的地址
语法：HelpFile(FilePath)
示例：
HelpFile=Err. HelpFile ‘返回HelpFile的地址
Err. HelpFile=”c:\test.txt” ‘设置HelpFile的地址
Err. HelpFile=”c:\test.txt” ‘设置HelpFile的地址
Number
描述：返回或者设置一个表示错误的数值
语法：Number(errid)
示例：
Number=Err. Number ‘返回Error的id
Err. Number=”c:\test.txt” ‘设置Error的id
Err. Number=”c:\test.txt” ‘设置Error的id
Source
描述：返回或者设置报告错误的对象（或者应用程序的名称）
语法：Source(string)
示例：
Source=Err. Source ‘返回Error的对象或者应用程序名称
Err. Source=”box” ‘设置Error的对象或者应用程序名称
Err. Source=”box” ‘设置Error的对象或者应用程序名称
© 版权声明
文章版权归作者所有，未经允许请勿转载。
相关文章
