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


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

   

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


  共有1805人关注过本帖树形打印复制链接

主题:调用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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
独孤求败
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:73 积分:177 威望:0 精华:0 注册:2012/12/30 1:44:06
  发帖心情 Post By:2021/4/2 15:20:16 [只看该作者]

不是的,开始显示字符串肯定是先执行了,你说的问题是因为调用sleep后导致显示阻塞了,没及时刷新出来

 回到顶部
帅哥哟,离线,有人找我吗?
onlyflyttn
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:20 积分:0 威望:0 精华:0 注册:2013/1/8 19:42:27
  发帖心情 Post By:2021/4/2 16:29:10 [只看该作者]

就是说,代码是按照逻辑执行,只不过输出延迟了?并不影响代码的目的!

 回到顶部
帅哥哟,离线,有人找我吗?
onlyflyttn
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

谢谢,问题已解决!

 回到顶部