[贴士] 计时

SzAngel

在从零开始学起时,在我硬盘上一些曾经帮助我很多的小纸条!--Sz

VBS do_time=timer
Delay 2000
VBS C=timer-do_time
VBSCall Call MessageBox(timer)
VBSCall Call MessageBox(do_time)
VBSCall Call MessageBox(c)

支持紫苑

???想说什么??

xgpolaris

//设定do_time等于 timer（从0.00到现在的 秒数）
VBS do_time=timer

//延迟2秒
Delay 2000

//设定C等于 timer（从0.00到目前秒数：过了2秒的时间）减去上一次记忆的变量do_time
VBS C=timer-do_time

//弹出消息显示timer值（这个timer不等于这段程序里面的第一个timer，也不等于第二个timer，而是当前的）
VBSCall Call MessageBox(timer)

//弹出消息显示变量do_timer值
VBSCall Call MessageBox(do_time)

//弹出消息显示变量C的值
VBSCall Call MessageBox(c)


其实这里把time  换成 now  则更好
VBS do_time=now
Delay 2000
//datediff函数   s表示秒  可以用m来表示分
C=DateDiff("s",do_time,now)
VBSCall Call MessageBox(now)
VBSCall Call MessageBox(do_time)
VBSCall Call MessageBox(c)



解释不正确的地方欢迎指正－－－北极星

[ 本帖最后由 xgpolaris 于 2007-10-30 15:35 编辑 ]

csnun

脚本好难啊  看不懂