user_znycd 发表于 2016-4-12 12:26:28

[求助]PowerPoint 中的VBA中怎样才能支持 Application.OnTime？

在幻灯片中，画一个按钮，命名为：cmdRefer，Caption 改名为“提交”
然后添加 Click 事件的代码。
但是它不支持 Ontime 的功能。在 Excel 中却可以。
Private Sub cmdRefer_Click()
Application.OnTime Now + TimeValue("00:00:05"), "clearAll"
End Sub
插入模块中有如下的代码：
Sub clearAll()
A.Value = False
B.Value = False
C.Value = False
D.Value = False
End Sub
A、B、C、D 是 4 个“复选框”按钮，分别命名为 A B C D，Caption 也改名为：A B C D
目的想通过 Ontime 来触发 清空 复选空，以便重做题目。
但PPT不支持 Ontime 的方法。不支如何才能在 PPT 中使用 Ontime
这个题目虽然不是Excel，但毕竟是 与“程序”相关，这边高手众多，而在PPT板块，对VBA感兴趣的人不多，因此发到这里来求助。

user_vtqgb 发表于 2016-4-12 13:47:26

延迟五秒钟？

user_tivywshy 发表于 2016-4-12 15:05:57

看看有沒有幫助
自動咝信c加載宏的問題（PPT中VBA的小結，含倒計時器）

user_pfywkzex 发表于 2016-4-12 15:06:14

谢谢lotustower（Emily ）先看看

user_mnwgy 发表于 2016-4-12 15:11:35

VB 中有 Timer控件和 Timer 事件，但 VBA 好像不支持？？？
怎样让 VBA 支持 Timer 控件和 Timer 事件？？？？

user_rewjb 发表于 2016-4-12 15:36:17

狼版的 VB 强啊，来帮我看看。谢谢！

user_qqnrs 发表于 2016-4-12 15:49:22

Using SetTimer/KillTimer API in PowerPoint 2000

三民主义 发表于 2016-4-12 16:37:03

lotustower 见多识广，不过，纯英文的网页看起来费力。谢谢了！

saga_0 发表于 2016-4-12 16:54:09

Ontime 归根结底用到应该还是:SetTimer/KillTimerAPI函数.

user_bxpwy 发表于 2016-4-12 16:54:40

那么怎样在 ppt 种调用这个 api 函数？实现按时执行代码的功能
页: [1] 2
查看完整版本: [求助]PowerPoint 中的VBA中怎样才能支持 Application.OnTime？