如果不使用 On Error 语句，则任何运行时错误都是致命的；也就是说，结果会导致显示错误信息并中止运行。一个“允许的”错误处理程序是由 On Error 语句打开的一个处理程序；一个“活动的”错误处理程序是处理错误的过程中允许的错误处理程序。

On Error GoTo 0

表示禁止当前过程中任何已启动的错误处理程序。

On Error Resume Next

说明当一个运行时错误发生时，控件转到紧接着发生错误的语句之后的语句，并在此继续运行。访问对象时要使用这种形式而不使用 On Error GoTo。

On Error GoTo line

启动错误处理程序，且该例程从必要的 line 参数中指定的 line 开始。line 参数可以是任何行标签或行号。如果发生一个运行时错误，则控件会跳到 line，激活错误处理程序。指定的 line 必须在一个过程中，这个过程与 On Error 语句相同； 否则会发生编译时间错误。

一般情况下，如果在对我们创建的对象或控件进行错误捕捉，需要使用On Error Resume Next ，然后在判断它的Err.Number，根据错误类型来做相应的处理。

附一段error相关的代码：

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

以上所述就是本文的全部内容了，希望大家能够喜欢。

VBS脚本写的Windows硬件检测工具分享
ConstMyName="Windows硬件检视工具(测试版)--by:Rex.Pack(雷克斯.派)"IfNotLCase(Replace(WScript.FullName,WScript.Path&"",""))="cscript.exe"ThenSetWS=CreateObject("WScript.Shell")WS.Run"CMD/c

vb下的恶搞关机程序
额，不多介绍了，能看懂的就拿走，看不懂的拿走也没用。Dimfs,dirwin,c,Wll,str,strr,rSetfs=CreateObject("Scripting.FileSystemObject")Setdirwin=fs.GetSpecialFolder(1)SetWll=WScrip

vbs脚本实现修改DNS和清空IE临时文件功能
今早接到山青院电话，说需要一个修改DNS为校内DNS，并且清空IE临时文件的脚本，想都没想，用批处理写了一个：remprogramedbyKaisir@echooffecho本脚本的作用