gpt4 book ai didi

Visio 对象的 VBA 动画

转载 作者:行者123 更新时间:2023-12-04 07:11:26 24 4
gpt4 key购买 nike

我正在尝试使用循环为 Visio 对象设置动画,例如:

For reposition = 2 To 6
xpos = reposition
ypos = reposition

sh1.SetCenter xpos, ypos

Sleep 1000

Next reposition

虽然这确实将对象从开始位置移动到结束位置,但中间步骤是不可见的。延迟后仅显示最终位置。

如果我放一个 MsgBox在循环中,每个中间位置都是可见的,但必须点击一个分散注意力的、位于中心的框才能看到这些。

如何在没有用户交互和模式窗口覆盖屏幕的情况下使流程可见?

最佳答案

试试 DoEvents睡前声明

关于Visio 对象的 VBA 动画,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/278475/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com