Foxtable(狐表)用户栏目专家坐堂 → 如何终止计划代码执行 2


  共有2530人关注过本帖树形打印复制链接

主题:如何终止计划代码执行 2

帅哥哟,离线,有人找我吗?
ycli368
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:989 积分:10366 威望:0 精华:0 注册:2012/12/11 14:25:00
如何终止计划代码执行 2  发帖心情 Post By:2015/9/12 18:45:00 [只看该作者]

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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:321 积分:1916 威望:0 精华:0 注册:2014/8/24 13:36:00
  发帖心情 Post By:2015/9/12 18:52:00 [只看该作者]

你就弄个简单的

 

设一个全局变量

 

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

 

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

 

停止按钮给变量赋值为假


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/13 10:35:00 [只看该作者]

方法一:2楼;

 

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

 


 回到顶部