欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → [求助]循环写的太大 求解决办法

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有3698人关注过本帖平板打印复制链接

主题:[求助]循环写的太大 求解决办法

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


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2012/12/25 13:16:48 [只看该作者]

PeekAndPump 方法

处理应用程序未处理的消息,可以用在一个循环操作较长的代码里,防止因为占用CPU过长而导致程序停止响应。

例如:

for i = 0 to 200000
    Application.PeekAndPump
Next
MsgBox "计算完了"

上述代码在长时间循环执行时,还可以执行软件的其他操作。

提醒用户,异步操作对编程能力要求很高,尤其要注意多个事件同时处理时公用变量的同步,未完成对象的销毁处理前要退出循环执行,稍有不注意就会导致程序崩溃。


 回到顶部