VB5“全局”错误处理

Question

我们必须处理用VB5编写的非常老的代码，这些代码应该在不受用户干预的情况下运行。

大多数subs和函数使用"on error goto...resume“语句来处理它的错误，但也有一些不是这样做的。

有没有办法创建全局错误处理或避免消息框“运行时错误...”并在未处理的错误上简单地关闭进程？(如果需要，我可以在停止时重新运行它，但不能单击"enter“或鼠标)。

Tnx，盖伊

Answer 1

如果只想在出现错误时中止该过程，可以使用如下样式

Begin Sub Blah()

On Error goto errplace

'procedure code here

Exit Sub
errplace:
End sub

您可以使用MZ tools add on将错误处理代码添加到VB6中的任何子/函数中，只需在其工具栏上单击一下(但对vb5不确定)