回 帖 发 新 帖 刷新版面

主题:求助,如何编写按钮中断程序

有时候由于编写的某一程序的计算时间较长,最好能在程序的运行时按下“中断按钮”中断正在运行的程序,请老师指教

回复列表 (共5个回复)

沙发

望眼欲穿,敬请指教

板凳

加一个DoEvents函数试试?有大循环吗?

3 楼

先声明一个全局布尔变量,例如Abort,然后增加一个[中断]按纽,在按纽的单击事件中添加如下代码:

Abort = True

最后在计算过程中添加适当的代码:
如果是DO循环,添加:

DoEvents
If Abort Then Exit Do

如果是FOR循环,添加:

DoEvents
If Abort Then Exit For

4 楼

加这个有个副作用,速度会变慢一点

5 楼

其实,好多程序是由不同的for。。。。等等循环组成的,如果按钮在循环以外那就比较麻烦

我来回复

您尚未登录,请登录后再回复。点此登录或注册