Err對(duì)象是一個(gè)具有全局范圍的內(nèi)部對(duì)象,含有關(guān)于錯(cuò)誤的所有信息。
On Error Resume next 忽略運(yùn)行時(shí)產(chǎn)生的所有錯(cuò)誤
On Error Goto 0 取消忽略錯(cuò)誤措施
主要方法有:Clear、Raise
主要屬性有:Description、HelpContext、HelpFile、Number、Source
其屬性及方法的詳細(xì)說明見下面的示例說明:
Err對(duì)象的方法
Clear
描述:清空Err對(duì)象當(dāng)前所有的屬性,也就是清空錯(cuò)誤
語法:Err.Clear
示例:
On Error Resume next '忽略運(yùn)行時(shí)產(chǎn)生的所有錯(cuò)誤
MsgBox 5/0
MsgBox Err.Number '輸出錯(cuò)誤的數(shù)值
Err.Clear '清空所有的錯(cuò)誤信息
MsgBox Err.Number '輸出0
Raise
描述:定義一個(gè)運(yùn)行時(shí)的錯(cuò)誤
語法:Err.Raise(number,source,description,helpfile,helpcontent)
參數(shù):Number:用于標(biāo)記錯(cuò)誤號(hào)
Source 標(biāo)記產(chǎn)生錯(cuò)誤的對(duì)象或者應(yīng)用程序名稱
Description:關(guān)于錯(cuò)誤的描述信息
Helpfile:help文件的有效路徑
Helpcontent:help文件的主題
示例:
On Error Resume Next
Err.Raise 22,"VBS腳本","溢出啦","c:\test.txt" '定義一個(gè)運(yùn)行時(shí)的錯(cuò)誤
MsgBox "錯(cuò)誤:" vbCrLf _
"Number:" Err.Number vbCrLf _
"Source:" Err.Source vbCrLf _
"Description:" Err.Description vbCrLf _
"Helpfile:" Err.HelpFile
Err.Clear '清除錯(cuò)誤
Err對(duì)象的屬性
Description
描述:返回或者設(shè)置Error的描述
語法:Description(conid)
示例:
Desc = Err.Description '返回Error的描述信息
Err.Description = "類型不匹配" '設(shè)置Error的描述信息
HelpContext
描述:返回或者設(shè)置指定幫助信息的主題
語法:HelpContext(string)
示例:
HelpContext = Err. HelpContext '返回Error的幫助主題
Err. HelpContext = "類型不匹配" '設(shè)置Error的幫助主題
HelpFile
描述:返回或者設(shè)置help文件的地址
語法:HelpFile(FilePath)
示例:
HelpFile = Err. HelpFile '返回HelpFile的地址
Err. HelpFile = "c:\test.txt" '設(shè)置HelpFile的地址
Number
描述:返回或者設(shè)置一個(gè)表示錯(cuò)誤的數(shù)值
語法:Number(errid)
示例:
Number = Err. Number '返回Error的id
Err. Number = "c:\test.txt" '設(shè)置Error的id
Source
描述:返回或者設(shè)置報(bào)告錯(cuò)誤的對(duì)象(或者應(yīng)用程序的名稱)
語法:Source(string)
示例:
Source = Err. Source '返回Error的對(duì)象或者應(yīng)用程序名稱
Err. Source = "box" '設(shè)置Error的對(duì)象或者應(yīng)用程序名稱