社区
VB基础类
帖子详情
老问题新问:还要关于doevents的
jourmen
2003-09-19 06:02:59
DoEvents
If flag Then ‘这里的flag是判断如果有cmdpause(),flag=true
退出
Else
Sleep 5s
End If
问题是:我第一次点pause时,它可以停下来,而当我在点start的时候程序只读一条日志,因为点击start也是一次doevents,所以它退出了,这个应该怎么避免呢?
又要麻烦大家了 :)
帮帮忙呀 :)
...全文
97
6
打赏
收藏
老问题新问:还要关于doevents的
DoEvents If flag Then ‘这里的flag是判断如果有cmdpause(),flag=true 退出 Else Sleep 5s End If 问题是:我第一次点pause时,它可以停下来,而当我在点start的时候程序只读一条日志,因为点击start也是一次doevents,所以它退出了,这个应该怎么避免呢? 又要麻烦大家了 :) 帮帮忙呀 :)
复制链接
扫一扫
分享
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
jourmen
2003-09-22
打赏
举报
回复
问题解决了:)
是这样子来得
If flag Then
flag = False
exit do
Else
Sleep SLEEPTIME
End If
DoEvents
在cmd1_click()里
flag=true
还是很感谢大家,结贴了:)
dreamreality
2003-09-21
打赏
举报
回复
If flag Then ‘这里的flag是判断如果有cmdpause(),flag=true
退出
Else
doevents
Sleep 5s
End If
dreamreality
2003-09-19
打赏
举报
回复
明白你的意思了,我想一想
zfl2k
2003-09-19
打赏
举报
回复
我想你是这样的:
定义flag为整型变量
flag=0 继续
flag=1 暂停
flag=2 退出
jourmen
2003-09-19
打赏
举报
回复
也就是说我点击pause的时候需要判断deevents,而点击start的时候不需要判断doevents
怎么做
不知道这样是否描述清楚了
dreamreality
2003-09-19
打赏
举报
回复
问题有些看不懂
Do
events
函数详解
Do
events
函数是一个很好用的函数,但很多人对它的用法不清楚或有误解。由于我在网上查到一篇关于此函数的用法,并添加了一些内容,不敢独享,特此献出。 其中有一个“控时循环和变速齿轮”的内容,有点意思,感兴趣的可看一看。 Do
Events
函数的功能是:转让控制权,以便让操作系统处理其它的事件。 问:为什么要用do
events
? A.在需要用某一循环处理相当耗时或者很快
Do
Events
的用法
注:摘自互联网VB Do
Events
用法VB6.0 Windows98 我要实现一个类似Windows复制(移动)文件时的提示窗体,耗时很长,且要求中断后能继续未完成的操作,不知使用Do
Events
从长循环中跳出后,程序将从何处开始继续执行,是否是从Do
Events
所在的Sub开始?(倔小孩) 事实上仅使用Do
Events
,并不意味着从长循环中跳出。Do
Events
只
从Do
Events
到Do
events
2:VB中的事件处理升级路径
在本章中,我们将深入了解自定义的Do
events
2函数以及它相较于传统VB语言中Do
Events
语句的优势。我们将从设计理念开始,逐步探讨如何在VB项目中集成这一创新函数,并展示其与VB环境的兼容性及实际集成步骤。
VBA—Do
events
说明
DO
events
的含义是转让控制权,以便让操作系统处理其它事件。 更通俗的理解是刷新。 以下用一个例子来说明。 1.先写一个窗体,然后再控制按钮里面写下如下代码 Private Sub CommandButton1_Click() Dim i! i = 1 Do i = i + 1 TextBox1.Value = Str(i) 'Do
Events
Loop Until i > 10000 End Sub 这样运行的结果就是得到10001(大概是一瞬间,看不到中间变量)。 注意.
国央企如何通过数字化转型提升创新研发决策的科学性?.docx
国央企如何通过数字化转型提升创新研发决策的科学性?
VB基础类
7,788
社区成员
197,583
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章