以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  关于程序执行时间的测试  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=73710)

--  作者:wukong_32
--  发布时间:2014/12/29 15:01:03
--  关于程序执行时间的测试

初学者请教,

 

问题1:

我想检测一下我的vbs执行的效率问题,能否在sub里,开始和最后分别设置TimeValue(time)

然后使用 MsgBox "time1:"&time1&"; time2:"&time2

输出后对比time1和time2的时间差,查看执行时间?

 

问题2:

如果上面的设计可以的话,VB中是否有精度更高的函数?可以取得毫秒的?类似于数据库中的呃时间戳

 

谢谢!


--  作者:王锋
--  发布时间:2014/12/29 17:13:59
--  

Document 对象

 

DebugFile(Path, Text, Time)

Path    日志保存全路径,比如"C:\\OrderLog.Txt"

Text    日志记录数据内容

Time    是否自动添加时间

 

这个对象的记录时间可以是精确到毫秒的


--  作者:wukong_32
--  发布时间:2014/12/29 18:38:11
--  

非常感谢,请问,这样计算的时间差,能反映出程序的执行效率吗?


--  作者:王锋
--  发布时间:2014/12/30 11:10:23
--  
能的
--  作者:pel46585
--  发布时间:2014/12/31 13:57:11
--  
检测vbs执行的效率,,,最好不要用毫秒级的去查看

Document 。DebugFile(Path, Text, Time)单是这句代码就可能用去几十毫秒。

想检测效率,就是多循环几次就行了,

t = Time(Now())

for i=1 to 1000\'1000太快,就换成10000.我一般用5秒左右的循环次数看效率。

...你想检测的代码部分...

next

msgbox Now() & "|" & t

同样的事情,有的代码用不了1秒,有的代码也实现了,却要3`5秒甚至更多。

不如好好优化自己的代码。

总感觉,除了大量的循环外,VBA不比C++慢多少。


--  作者:wukong_32
--  发布时间:2015/1/1 16:54:38
--  

多谢建议,我试看看