on error goto error

我知道它是指出现错误时跳转到goto指定的位置,可这条语句放在什么地方啊,就是如果在一个程序中,把他放在一个位置,他是来判断谁的错误啊,就是这条语句的具体用法

放在,可能出现错误的语句的前面(上面):
比如,除数不可以0,下面这个例子告诉你怎么使用:
窗体上添加1个按钮就可以:
Option Explicit

Private Sub Command1_Click()
Dim a As Single
Dim b As Single
Dim y As Single
a = InputBox("输入被除数a")
b = InputBox("输入除数b")
On Error GoTo MyerrNum '放在这里,是因为进行除法运算时,可能出现除数为0的错误

y = a / b

Print a & "/" & b & "=" & y

Exit Sub

MyerrNum:
MsgBox Err.Description '显示错误的描述
MsgBox Err.Number '显示错误的编号

End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2018-10-31
On Error GoTo 0
表示禁止当前过程中任何已启动的错误处理程序。

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

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

以上MSDN上的解释

一般情况下,如果在对我们创建的对象或控件进行错误捕捉,需要使用On Error Resume Next ,然后在判断它的Err.Number,根据错误类型来做相应的处理。本回答被网友采纳
第2个回答  2013-09-13
执行可能会出错的位置
第3个回答  2018-01-03
On Error GoTo 0
表示禁止当前过程中任何已启动的错误处理程序。

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

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

以上MSDN上的解释

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