Err
含有關(guān)于運行時錯誤的信息。接受用于生成和清除運行時錯誤的 Raise 和 Clear 方法。
說明
Err 對象是一個具有全局范圍 —的固有對象:不必在您的代碼中創(chuàng)建它的示例。Err的屬性被一個錯誤 —的生成器設(shè)置:Visual Basic,自動對象,或 VBScript 程序。
Err 對象的默認(rèn)屬性是 number。Err.Number 含有一個整數(shù),且可由 Automation 對象使用以返回 SCODE。
當(dāng)發(fā)生運行時錯誤時,Err 的屬性由標(biāo)識錯誤的唯一信息以及可用于處理它的信息填充。要在代碼中生成運行時錯誤,請用 Raise 方法。
Err 對象屬性被重新設(shè)置為零或零長度字符串 ("")。Clear 方法可被用于顯式地重新設(shè)置 Err。
下面的示例說明了 Err 對象的用法:
On Error Resume Next
Err.Raise 6 '產(chǎn)生溢出錯誤。
MsgBox ("Error # " CStr(Err.Number) " " Err.Description)
Err.Clear '清除錯誤。
Err對象是一個具有全局范圍的內(nèi)部對象,含有關(guān)于錯誤的所有信息。
On Error Resume next 忽略運行時產(chǎn)生的所有錯誤
On Error Goto 0 取消忽略錯誤措施
主要方法有:Clear、Raise
主要屬性有:Description、HelpContext、HelpFile、Number、Source
其屬性及方法的詳細(xì)說明見下面的示例說明:
Err對象的方法
Clear
描述:清空Err對象當(dāng)前所有的屬性,也就是清空錯誤
語法:Err.Clear
示例:
On Error Resume next '忽略運行時產(chǎn)生的所有錯誤
MsgBox 5/0
MsgBox Err.Number '輸出錯誤的數(shù)值
Err.Clear '清空所有的錯誤信息
MsgBox Err.Number '輸出0
Raise
描述:定義一個運行時的錯誤
語法:Err.Raise(number,source,description,helpfile,helpcontent)
參數(shù):Number:用于標(biāo)記錯誤號
Source 標(biāo)記產(chǎn)生錯誤的對象或者應(yīng)用程序名稱
Description:關(guān)于錯誤的描述信息
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
描述:返回或者設(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è)置一個表示錯誤的數(shù)值
語法:Number(errid)
示例:
Number = Err. Number '返回Error的id
Err. Number = "c:\test.txt" '設(shè)置Error的id
Source
描述:返回或者設(shè)置報告錯誤的對象(或者應(yīng)用程序的名稱)
語法:Source(string)
示例:
Source = Err. Source '返回Error的對象或者應(yīng)用程序名稱
Err. Source = "box" '設(shè)置Error的對象或者應(yīng)用程序名稱