码迷,mamicode.com
首页 > 其他好文 > 详细

对西门脚本分析延时加载动作

时间:2016-03-09 17:42:33      阅读:197      评论:0      收藏:0      [点我收藏+]

标签:

Dim LastTime, StopTime, i

StopTime= Now+DelayTime/24/3600  //DelayTime 为可以设置的延时秒数,  1/24/3600 为一秒的单位, 0.1/24/3600为100毫秒的单位, 对某个数取模余数一定在这个数                                                       //的范围内变化。

ShowSystemAlarm "Script will be waiting for " & DelayTime & " seconds."
Do
If Now>LastTime + 0.1/24/3600 Then
i = i+1
ShowSystemAlarm "Script is waiting " & Left("....", (i Mod 4) +1)
LastTime= Now
End If
Loop Until Now>=StopTime

ShowSystemAlarm "Script resumes working."

对西门脚本分析延时加载动作

标签:

原文地址:http://www.cnblogs.com/C-CHERS/p/5258729.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!