如何用PowerPoint制作比赛计时器

选用PowerPoint 2003，利用自定义动画中的“出现”方式，设置每一个对象的延时为1秒来实现，下面我详细介绍一下过程。
    输入标题
     打开PowerPoint   2003，选择“空演示文稿”，版式选为“只有标题”，在标题文本框中输入“英语口语比赛计时系统”字体设置“加粗”。由于我们在播放幻灯片的时候，需要用的简单的宏命令，所以还需要将宏的安全性降低，方便我们使用。依次单击“工具/宏/安全性”，然后将“安全级别”降为“低”即可。
    动态时间显示的制作
     我们要实现计时开始后能够实时动态的显示时间，这里是倒计时(剩余时间)。实现的方法是:在幻灯片中插入文本框，文本框的内容分别为1、2、3等这些数字，然后利用“自定义动画”里面的“出现”效果对这些文本框进行动画设置，每一个对象在前一个对象出现后1秒出现。
     在本例中因为计时时间为30秒，应该需要30个文本框，但是第一个文本框的延时时间为0秒，所以我们总共要插入31个文本框，第一个文本框没有停留时间，这些文本框的内容分别是30、29……2、1、0，即第一个文本框内容是“30”，最后一个文本框内容是“0”，这样输入可以在后面的动画设置时方便一些，设置所有文本框对齐方式为“水平居中”、“垂直居中”。这里我们以设置一个文本框的自定义动画效果为例来说明一下操作步骤:

      1. 选择要设置自定义动画的文本框。

      2. 打开菜单“幻灯片放映/自定义动画”，在弹出的“自定义动画”对话框中我们单击 “添加效果/进入/出现”设置该对象的动画效果为“出现”。

      3. 在弹出的对话框中我们单击要设置对象右面的下拉按纽，选择“效果选项”命令。

      4. 单击“效果选项”命令以后会弹出“出现”对话框，在该对话框中我们单击“效果”标签，设置动画播放后为“下次单击后隐藏”、“无声音”、“整批发送”。然后选择“计时”标签，设置开始方式为“之后”，延迟为“1秒”。

      按上述步骤分别设置所有文本框的自定义动画:播放方式为“出现”，动画播放后的效果:所有文本(文本31除外)为“下次单击后藏”，
      文本31为“不变暗”。启动方式为:所有文本(文本1除外)为前一动画“之后”延迟为“1秒”， 
      文本1为“单击”起动，延迟为“0秒”，文本框的顺序为:“文本1”、“文本2”一直到“文本31”。即图中所示的“形状2”到“形状32”。
     最后我们插入两个修饰性的文本框，输入内容分别为“距离结束还有”、“秒”，调整位置，至此动态时间显示部分制作完成。
     进度条的制作
     进度条可以帮助我们很明了的看出已经用过的时间。本例中是以百分比的形式显示的，这里的进度条是用矩形来实现，每2秒中进度条变换一次(即每2秒出现一个矩形)，所以我们需要15个矩形块。
     在幻灯片中做好一个矩形块然后复制出其它的，矩形的大小我们自己适当掌握，设置矩形属性为:填充色“蓝色”、“无线条”，然后把这些矩形排列成如图2中所示的样式，为了实现如图1中进度条的效果，我们在进度条的下面再插入一个大的矩形，然后设置填充为较暗的颜色，叠放次序为“最底层”。
     下面设置一下进度条中各矩形的动画，我们打开菜单“幻灯片放映/自定义动画”在弹出的“自定义动画”对话框中我们分别设置各矩形：动画顺序为两个文本后面插入一个矩形，本例中的文本1对应自定义动画中的形状2，依次类推，因为第一个文本框停留时间为0所以第一个矩形在第三个文本框后面，第二个矩形在第5个后面依此类推，本例中的第一个矩形对应自定义动画中的矩形33，所以在自定义动画对话框中调整动画顺序为“形状4”下面是“矩形33”
    “形状6”下面是“矩形34”一直到“形状32”的下面是“矩形47”，所有矩形的启动动画方式均为:“开始”方式为“之前”，“延迟”为1秒；所有矩形的效果为:“出现”，“动画播放不变暗”。
     最后我们再修饰一下进度条，在其下面添加指示数字“0、25%、50%、75%、100%”，然后把这些数字“横向分布”，至此进度条部分制作完成。
     按钮的制作
     最后我们制作“开始计时”按钮，打开菜单“视图/工具栏/控件工具箱”，单击“按钮”工具，然后在幻灯片上拖动出一个按钮，右击该按钮，打开属性对话框，设置“caption”属性为“开始计时”，关闭对话框，回到幻灯片页面下，双击该按钮，在出现的代码窗口中输入以下代码:
             Private Sub CommandButton1_Click()
             　　ActivePresentation.SlideShowSettings.Run
             　　SlideShowWindows(Index:=1).View.Next
             　　End Sub
     我们的制作全部完成，来检验一下成果吧，按“F5”放映幻灯片，然后单击“开始计时”按钮，计时开始，效果如图所示。
小提示：在播放过程中，首先需要验证该PowerPoint的宏安全级别是否为“低”，否则将无法调用计时功能。

来源：行走在虚拟和现实之间

Bleriot 发表于 2009-11-15 18:46:06

楼主辛苦了~很强大

wangsiyu32 发表于 2009-8-02 08:30:54

谢谢楼主，辛苦了！

yyzhluo 发表于 2009-6-08 16:20:20

八错，顶一下

soft365 发表于 2009-6-08 13:45:18

都可以实现，不过比较复杂

sciklong2 发表于 2009-5-03 15:17:27

评 5 分

guoxueyan38 发表于 2009-3-27 15:29:41

好像有点复杂，有没有做好的样本发上来看看撒

0801020334 发表于 2009-1-20 19:45:57

做出来了，是挺简单的，就是有点繁琐。

gooo525 发表于 2009-1-17 10:58:47

实践了一下楼主介绍的方法，很有意思，谢谢啊

netmaster203 发表于 2009-1-08 08:44:45

评 3 分

btzhangxiaoya 发表于 2008-12-29 15:03:22

挺有创意的

sunlei 发表于 2008-12-26 16:00:05

一种思路

rosemary307 发表于 2008-12-23 19:36:46

试下先。。。。。看效果

夜茴 发表于 2008-11-19 15:36:06

.........................看懂了，但是好像很麻烦地........

wanwan 发表于 2008-11-15 02:07:58

很简单的怎么做的这么复杂啊！

winnie_zz 发表于 2008-11-12 10:27:46

前面的还懂一点，后面就不知是什么来的！然后，为什么没有图呢？

ttm02308 发表于 2008-10-25 19:39:39

試做看看，謝謝分享

cyw125873218 发表于 2008-10-23 08:31:57

呵呵！
不是很复杂的

lvgang23 发表于 2008-10-08 11:09:19

应该是可以做出来的~~

zhangxuchun 发表于 2008-9-21 14:54:37

几个问题请解释一下：如果想停止倒计时该怎么编程？
怎么使进度条复原？
怎么开始下一次计时，是不是程序里需要个循环的语句？
回答另一个问题时，超链接到倒计时画面，该怎么激活倒计时？？

shufujia1900 发表于 2008-9-18 17:54:57

请问进度条的图片在哪里？