明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2951|回复: 3

[VBA]如何使On Error Resume Next 语句失效?

[复制链接]
发表于 2006-1-14 21:01:00 | 显示全部楼层 |阅读模式

如题

程序中 某处增加了 On Error Resume Next 语句

那么如果想在接下来的某处取消这个功能 如何操作?

假设程序只有一个Sub 而且不能分割成几个Sub

这个想法可能BT了一点 还是举个例子说明吧

程序开始

Sub

…………

…………

处理第一批事情

…………

…………

处理第二批事情(这里很容易产生一个错误 所以写了On Error语句 专门来处理这个错误)

On Error Resume Next

…………

…………

处理第三批事情--->这里还不知道会产生什么错误,所以需要发生错误的时候,程序停下来,

这样才能更好的修改完善程序.那自然要让刚才写的 On Error语句失效 才能方便检查出接下来

将发生的错误。那么如何让On Error 语句失效? On Error Then Stop????狂想中。。。

…………

…………

End Sub

发表于 2006-1-15 12:20:00 | 显示全部楼层

好像可以用

If Err Then 

但是没试过

发表于 2006-1-15 16:47:00 | 显示全部楼层
On Error goto 0
发表于 2006-1-17 15:39:00 | 显示全部楼层

简单

if err then

    on error goto 0

    你的处理方法

end if

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-27 06:22 , Processed in 0.164089 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表