Foxtable(狐表)用户栏目专家坐堂 → 异步执行的终止


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

主题:异步执行的终止

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


加好友 发短信
等级:六尾狐 帖子:1499 积分:11175 威望:0 精华:0 注册:2014/8/13 16:19:00
异步执行的终止  发帖心情 Post By:2024/7/18 10:56:00 [显示全部帖子]

关于异步执行,大概代码如下,我想点按钮终止异步执行,好像不起作用。麻烦指导一下。


Public Total As Integer

public pauseflag as boolean 

首先增加一个名为"AddTotal"的函数,代码为:

if pauseflag = false then return nothing

For i As Integer = 1 To 100
    
Total = Total + 1


Next

然后在命令窗口用AsyncExecute方法异步执行此函数100次:

Total = 0

pauseflag = true
For 
i As Integer = 1 To 100
    
Functions.AsyncExecute("AddTotal")
Next

Sleep 
(2000'等待2秒,待所有子线程线程执行完毕
Return 
Total


然后我在其他的地方设置一个按钮,点按钮时执行:pauseflag = false


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


加好友 发短信
等级:六尾狐 帖子:1499 积分:11175 威望:0 精华:0 注册:2014/8/13 16:19:00
  发帖心情 Post By:2024/7/19 13:23:00 [显示全部帖子]

没理解。
然后我在其他的地方设置一个按钮,点按钮时执行:pauseflag = false
这里,我改成同步函数处理?

 回到顶部