近日发现一种最简单的方法是用VBA，在PPT的控件工具箱里，拖一个Label的标签，双击该Label，写入如下代码：
Private Sub Label1_Click()Label1.Caption = Format(Now, "hh:mm:ss")End Sub
也可以显示当前时间，不足之处是，必须单击时才能看到时间的变化.
