Err对象是一个具有全局范围的内部对象,含有关于错误的所有信息。
On Error Resume next 忽略运行时产生的所有错误
On Error Goto 0 取消忽略错误措施
主要方法有:Clear、Raise
主要属性有:Description、HelpContext、HelpFile、Number、Source
其属性及方法的详细说明见下面的示例说明:
Err对象的方法
Clear
描述:清空Err对象当前所有的属性,也就是清空错误
语法:Err.Clear
示例:
1
2
3
4
5
|
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文件的主题
示例:
1
2
3
4
5
6
7
8
|
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)
示例:
1
2
|
Desc = Err.Description '返回Error的描述信息
Err.Description = "类型不匹配" '设置Error的描述信息
|
HelpContext
描述:返回或者设置指定帮助信息的主题
语法:HelpContext(string)
示例:
1
2
|
HelpContext = Err. HelpContext '返回Error的帮助主题
Err. HelpContext = "类型不匹配" '设置Error的帮助主题
|
HelpFile
描述:返回或者设置help文件的地址
语法:HelpFile(FilePath)
示例:
1
2
|
HelpFile = Err. HelpFile '返回HelpFile的地址
Err. HelpFile = "c:\test.txt" '设置HelpFile的地址
|
Number
描述:返回或者设置一个表示错误的数值
语法:Number(errid)
示例:
1
2
|
Number = Err. Number '返回Error的id
Err. Number = "c:\test.txt" '设置Error的id
|
Source
描述:返回或者设置报告错误的对象(或者应用程序的名称)
语法:Source(string)
示例:
1
2
|
Source = Err. Source '返回Error的对象或者应用程序名称
Err. Source = "box" '设置Error的对象或者应用程序名称
|