高级功能研发区-延时语句怎么写?金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  延时语句怎么写?  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=75710)

--  作者：dwjgwsm
--  发布时间：2015/2/17 10:22:46
--  延时语句怎么写?
Wscript.Sleep 1000
缺少Wscript对象

--  作者：王锋
--  发布时间：2015/2/17 11:17:15
--
该示例使用金字塔的VBS系统调用WINDOWS API中的Sleep函数来实现延时功能
参数为延时毫秒数
Sub StockSleep(slSecond)
Set Wrap = CreateObject("DynamicWrapper")
Wrap.Register "KERNEL32.DLL", "Sleep","i=u","R=l"
Wrap.Sleep(slSecond)
End Sub