国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBScript中On Error語句用法小結(jié)

2020-06-26 18:31:25
字體:
供稿:網(wǎng)友

VBScript語言提供了兩個語句和一個對象來處理"運行時錯誤",如下,1.On Error Resume Next語句,2.On Error Goto 0語句,3.Err對象,下面我們就來詳細探討下。

如果不使用 On Error 語句,則任何運行時錯誤都是致命的;也就是說,結(jié)果會導(dǎo)致顯示錯誤信息并中止運行。一個“允許的”錯誤處理程序是由 On Error 語句打開的一個處理程序;一個“活動的”錯誤處理程序是處理錯誤的過程中允許的錯誤處理程序。

On Error GoTo 0

表示禁止當前過程中任何已啟動的錯誤處理程序。

On Error Resume Next

說明當一個運行時錯誤發(fā)生時,控件轉(zhuǎn)到緊接著發(fā)生錯誤的語句之后的語句,并在此繼續(xù)運行。訪問對象時要使用這種形式而不使用 On Error GoTo。

On Error GoTo line

啟動錯誤處理程序,且該例程從必要的 line 參數(shù)中指定的 line 開始。line 參數(shù)可以是任何行標簽或行號。如果發(fā)生一個運行時錯誤,則控件會跳到 line,激活錯誤處理程序。指定的 line 必須在一個過程中,這個過程與 On Error 語句相同; 否則會發(fā)生編譯時間錯誤。

一般情況下,如果在對我們創(chuàng)建的對象或控件進行錯誤捕捉,需要使用On Error Resume Next ,然后在判斷它的Err.Number,根據(jù)錯誤類型來做相應(yīng)的處理。

附一段error相關(guān)的代碼:

 

 
  1. On Error Resume Next 
  2. Dim Msg 
  3. Err.Clear 
  4. Err.Raise 6 ' Generate "Overflow" error. 
  5. Err.Helpfile = "yourHelp.hlp" 
  6. Err.HelpContext = 5 
  7. If Err.Number <> 0 Then 
  8. Msg = "Press F1 or Help to see " & Err.Helpfile & " topic for" & _ 
  9. " the following HelpContext: " & Err.HelpContext 
  10. MsgBox Msg, , "error: " & Err.Description, Err.Helpfile, Err.HelpContext 
  11. End If 

以上所述就是本文的全部內(nèi)容了,希望大家能夠喜歡。

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 郁南县| 台中县| 西城区| 安塞县| 永寿县| 岳普湖县| 黄大仙区| 土默特左旗| 焦作市| 兴文县| 福贡县| 丹巴县| 绵竹市| 天柱县| 安化县| 连平县| 湖口县| 沂源县| 集贤县| 措美县| 常德市| 疏勒县| 威远县| 云和县| 泾阳县| 乌鲁木齐县| 汾西县| 光泽县| 屏边| SHOW| 肥乡县| 上杭县| 张家港市| 荔波县| 沾化县| 烟台市| 定州市| 驻马店市| 阜阳市| 荣昌县| 南郑县|