VBS基础篇 Err对象

时间:2022-10-03 17:39:52

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的对象或者应用程序名称