如何清空 Error 对象？

[tiger_zl]

遍了一个程序，其中要用到错误处理：
先用 Err.number=0 清空，再用 On error goto errHandle 捕捉错误，在错误处理程序段用
if err.number<>0 then 进行处理，没有用 Exit sub 来跳出没出错的程序段，调试时没有进入错误处理段是通过的，编译后安装到其他机器，却进入了，看结果其实没有错误！程序段如下：
err.number=0
on error goto errHandle
.....（数据库操作）
.....（文件操作，文件我肯定是关闭后，才备份到其他目录的）
if err.number<>0 then
msgbox "出错"
endif
但是，当在两个操作之间再加一个 err.number=0 却不报错
不知道是何故，我也用过 err.clear 了，请大家帮忙！

[tiger_zl]

用Exit sub 我试过的肯定是没问题的，软件工程不是要避免多出口吗？

[wulang]

这个你不用担心，Exit Sub是配合On Error Goto的标准用法，也是VB中用来退出子函数过程常用方法，不存在什么多出口问题。

[tiger_zl]

谢谢

[wulang]

你为什么要这样做呢?Exit Sub不好吗?