//首先定义一个全局变量T,并把当前时间赋值给T,启动线程,计算当前运行时间,与其他脚本没有冲突
Dimenv T
T = now
BeginThread 运行时间
Sub 运行时间
Do
TracePrint DiffADate(t)
Delay 1000
loop
End Sub
Function DiffADate (theDate)
DiffADate = "运行时间为:" & DateDiff("s", theDate, now)
End Function
t1 = Plugin.Sys.GetTime()
For 10
Delay 100
Next
t2 = Plugin.Sys.GetTime()
s = t2 - t1
//下面这句是精准地计算毫秒时间差
xs=int(s/1000/60/60)
fz=int(s/1000/60)-xs*60
m=Clng(s/1000)-fz*60-xs*60*60
MessageBox "您的操作系统从启动到目前的时间:" & xs & "小时" & fz & "分钟" & m & "秒"
t1 = Plugin.Sys.GetTime()
//你的代码
t2 = Plugin.Sys.GetTime()
MessageBox t2 - t1