高级功能研发区-[求助]VBA如何获得当前的电脑时间？最好毫秒级别金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]VBA如何获得当前的电脑时间？最好毫秒级别  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=4631)

--  作者：阿火
--  发布时间：2010/12/29 14:53:26
--  [求助]VBA如何获得当前的电脑时间？最好毫秒级别
如题，哪个对象哪个方法可以获得当前的时间？越精确越好

--  作者：夏小飞
--  发布时间：2010/12/29 14:59:48
--
time()

--  作者：一亩三分地
--  发布时间：2010/12/29 17:34:57
--
想获得毫秒级的时间信息，可以使用Win API GetTickCount，返回系统开机到当前的Tick数，以毫秒为单位。

sub test()
      Set Wrap = CreateObject("DynamicWrapper")
      Wrap.Register "KERNEL32.DLL","GetTickCount","f=s","r=l"
      msgbox Wrap.GetTickCount
end sub

--  作者：阿火
--  发布时间：2010/12/30 9:42:57
--

谢谢一亩三分地

但返回的好像是数字？我想要毫秒级别的时间 time() 或者now() 好像是秒而已

--  作者：一亩三分地
--  发布时间：2010/12/30 11:25:57
--
绝对精准毫秒级的时间好像无法得到。通常使用两次GetTickCount的毫秒差

--  作者：kepler
--  发布时间：2013/1/21 16:19:51
--
毫秒级应该没有什么实战意义吧? 几个交易所之间的偏差有时都有1秒钟.本地时间和北京时间和交易所时间和金字塔服务器时间.这么多时间偏差1秒半秒的完全是正常的.