Application.Wait会跳过一些命令

Question

如果我使用命令“Application.Wait（1）”，程序将跳过下一个命令。 我在for循环中使用Application.Wait。

我正在使用此代码：

    For i = 1 To 34
        Application.Wait (2)
        Call Rechts
    Next i

此代码复制每一轮图片框中的图片。 但实际上代码只复制图片框中的最后一个。 在结尾它应该看起来像幻灯片。

我怎样才能在For-Loop中等待一秒钟？

Answer 1

您需要指定应用程序等待直到

的时间

最简单的方法是使用Now()方法并添加您自己的其他变体，如下所示：

Application.Wait Now + TimeSerial(0, 0, 1)