Foxtable(狐表)用户栏目专家坐堂 → 如何暂停程序


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

主题:如何暂停程序

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/21 15:41:00 [显示全部帖子]

可以弹出msgbox吧?

 

http://www.foxtable.com/webhelp/scr/0326.htm

 

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/22 18:17:00 [显示全部帖子]

那就这样写代码,如

 

Do While vars("完成") = False
    Application.DoEvents
Loop
msgbox("ok")

 

然后控制 vars("完成") = true 结束暂停,执行msgbox


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/23 8:43:00 [显示全部帖子]

无法理解你的意思,先执行代码

 

msgbox(1)

Do While vars("完成") = False
    Application.DoEvents
Loop
msgbox("ok")

 

暂停以后,在另外地方执行 vars("完成") = true 结束暂停


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/23 9:45:00 [显示全部帖子]

以下是引用malavazos在2018/3/23 9:37:00的发言:
我的编码是程序每次启动发出两个检查提醒窗口,分别检查计量器具检定周期是否到期,及计划维护任务是否到期。如果无到期任务,直接执行下午,如有要停止在窗口。关闭该窗口后继续执行。
我不知如何将我的代码,带入您的代码中。
可否费心帮助调整一下。
谢谢

 

把提示窗口弄成【模式窗口】即可

 

http://www.foxtable.com/webhelp/scr/0697.htm

 


 回到顶部