温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

如何使用doevents

发布时间:2021-11-02 18:01:37 来源:亿速云 阅读:238 作者:柒染 栏目:大数据

今天就跟大家聊聊有关如何使用doevents,可能很多人都不太了解,为了让大家更加了解,小编给大家总结了以下内容,希望大家根据这篇文章可以有所收获。

如何使用doevents

Doevents

把权限转让给操作系统,处理事件使用。好处就是,系统界面不会卡顿。

使用场景:我们一般处理大量数据,导致系统卡在当前界面上面,考虑到用户体验,我们要使用doevents

doevents注意点

1、使用doevents的时候,如果事件还没有结束,就马上关掉,程序还在执行中,并没有真正关键应用程序。

2、在拖动系统界面的时候,doevents对程序需要刷新的值就不会被刷新

防止doevents造成无法关闭进程的解决方案

使用在form_unload事件中,即窗体结束之前执行

1、在循环中加入一个结束循环的标记 

2、使用end结束

课堂总结

1、学会使用doevents,了解应用场景,可以使用在读取大文件时候

2、掌握doevents造成进程存留的解决方案

3、在执行系统其它事件的时候,会使得对应的界面不会被刷新界面:

如何使用doevents

源代码:

Dim flag As BooleanPrivate Sub Command1_Click()flag = TrueDim i As DoubleWhile flagText1.Text = Val(Text1.Text) + 1DoEventsWendEnd Sub
Private Sub Form_Unload(Cancel As Integer)flag = FalseEndEnd Sub

看完上述内容,你们对如何使用doevents有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注亿速云行业资讯频道,感谢大家的支持。

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI