欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 调用Win32Api的问题

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有1813人关注过本帖平板打印复制链接

主题：调用Win32Api的问题
帅哥哟，离线，有人找我吗？
onlyflyttn
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：20 积分：0 威望：0 精华：0 注册：2013/1/8 19:42:27 		调用Win32Api的问题  发帖心情 Post By：2021/4/2 15:14:44 [只看该作者]

在调用延迟函数时，输出结果明显是整体代码首先延迟再执行，这完全违反了编写逻辑，希望VBA中能恢复Vbs的Sleep函数！
Sub StockSleep(slSecond)
Dim Wrap
Set Wrap = CreateObject("DynamicWrapperX")
Wrap.Register"KERNEL32.DLL","Sleep","i=u","r=l"
Wrap.Sleep(slSecond)
'Set Wrap = Nothing
End Sub

Sub SleepTest
Application.MsgOut "开始"
StockSleep 3000
Application.MsgOut "结束"
End Sub


另外帖子怎么插入附件？
[此贴子已经被作者于2021/4/2 15:16:01编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 03.56250 秒, 5 次数据查询