以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何终止计划代码执行 2  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74507)
--  作者：ycli368
--  发布时间：2015/9/12 18:45:00
--  如何终止计划代码执行 2
MyTimers("数据导入").Enabled = False ‘计划只执行一次

messagebox.show("开始导入")
Dim Total As Long
For i As Integer = 1 To 1000000
Total = Total + i
Next

通过计划实现多线程同步，单击“停止”按钮后要让计划代码执行停下来，如何实现，求指导
[此贴子已经被作者于2015/9/12 18:45:46编辑过]
--  作者：游
--  发布时间：2015/9/12 18:52:00
--  

你就弄个简单的

 

设一个全局变量

 

计划启动时给变量赋值为真

 

计划执行时检查变量，如果为假就终止并退出

 

停止按钮给变量赋值为假
--  作者：大红袍
--  发布时间：2015/9/13 10:35:00
--  

方法一：2楼；

 

方法二：多线程 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=74090&skin=0