最近學校要舉辦一次英語口語比賽，其中有一個環(huán)節(jié)是自由演講，時間為30秒，由選手自己選定主題。領導決定由我來設計一個計時系統(tǒng)，要求能夠實時顯示選手剩余時間。我決定選用PowerPoint 2003，利用自定義動畫中的“出現(xiàn)”方式，設置每一個對象的延時為1秒來實現(xiàn)，下面我詳細介紹一下制作過程。

輸入標題
打開PowerPoint 2003，選擇“空演示文稿”，版式選為“只有標題”，在標題文本框中輸入“英語口語比賽計時系統(tǒng)”字體設置為“加粗”。由于我們在播放幻燈片的時候，需要用的簡單的宏命令，所以還需要將宏的安全性降低，方便我們使用。依次單擊“工具/宏/安全性”，然后將“安全級別”降為“低”即可。

動態(tài)時間顯示的制作
我們要實現(xiàn)計時開始后能夠實時動態(tài)的顯示時間，這里是倒計時(剩余時間)。實現(xiàn)的方法是:在幻燈片中插入文本框，文本框的內容分別為1、2、3等這些數(shù)字，然后利用“自定義動畫”里面的“出現(xiàn)”效果對這些文本框進行動畫設置，每一個對象在前一個對象出現(xiàn)后1秒出現(xiàn)。

在本例中因為計時時間為30秒，應該需要30個文本框，但是第一個文本框的延時時間為0秒，所以我們總共要插入31個文本框，第一個文本框沒有停留時間，這些文本框的內容分別是30、29……2、1、0，即第一個文本框內容是“30”，最后一個文本框內容是?”，這樣輸入可以在后面的動畫設置時方便一些，設置所有文本框對齊方式為“水平居中”、“垂直居中”。這里我們以設置一個文本框的自定義動畫效果為例來說明一下.

操作步驟:
1. 選擇要設置自定義動畫的文本框。
2. 打開菜單“幻燈片放映/自定義動畫”，在彈出的“自定義動畫”對話框中我們單擊 “添加效果/進入/出現(xiàn)”設置該對象的動畫效果為“出現(xiàn)”。
3. 在彈出的對話框中我們單擊要設置對象右面的下拉按紐，選擇“效果選項”命令。
4. 單擊“效果選項”命令以后會彈出“出現(xiàn)”對話框，在該對話框中我們單擊“效果”標簽，設置動畫播放后為“下次單擊后隱藏”、“無聲音”、“整批發(fā)送”。然后選擇“計時”標簽，設置開始方式為“之后”，延遲為“1秒”。
按上述步驟分別設置所有文本框的自定義動畫:播放方式為“出現(xiàn)”，動畫播放后的效果:所有文本(文本31除外)為“下次單擊后隱藏”， 文本31為“不變暗”。啟動方式為:所有文本(文本1除外)為前一動畫“之后”延遲為“1秒”， 文本1為“單擊”起動，延遲為“0秒”，文本框的順序為:“文本1”、“文本2”一直到“文本31”。即圖中所示的“形狀2”到“形狀32”。
最后我們插入兩個修飾性的文本框，輸入內容分別為“距離結束還有”、“秒”，調整位置如圖2所示，至此動態(tài)時間顯示部分制作完成。

進度條的制作
進度條可以幫助我們很明了的看出已經用過的時間。本例中是以百分比的形式顯示的，這里的進度條是用矩形來實現(xiàn)，每2秒中進度條變換一次(即每2秒出現(xiàn)一個矩形)，所以我們需要15個矩形塊。
在幻燈片中做好一個矩形塊然后復制出其它的，矩形的大小我們自己適當掌握，設置矩形屬性為:填充色“藍色”、“無線條”，然后把這些矩形排列成如圖2中所示的樣式，為了實現(xiàn)如圖1中進度條的效果，我們在進度條的下面再插入一個大的矩形，然后設置填充為較暗的顏色，疊放次序為“最底層”。
下面設置一下進度條中各矩形的動畫，我們打開菜單“幻燈片放映/自定義動畫”在彈出的“自定義動畫”對話框中我們分別設置各矩形：動畫順序為兩個文本后面插入一個矩形，本例中的文本1對應自定義動畫中的形狀2，依次類推，因為第一個文本框停留時間為0所以第一個矩形在第三個文本框后面，第二個矩形在第5個后面依此類推，本例中的第一個矩形對應自定義動畫中的矩形33，所以在自定義動畫對話框中調整動畫順序為“形狀4”下面是“矩形33” “形狀6”下面是“矩形34”一直到“形狀32”的下面是“矩形47”，所有矩形的啟動動畫方式均為：“開始”方式為“之前”，“延遲”為1秒；所有矩形的效果為:“出現(xiàn)”，“動畫播放不變暗”。
最后我們再修飾一下進度條，在其下面添加指示數(shù)字“0、25%、50%、75%、100%”，然后把這些數(shù)字“橫向分布”，至此進度條部分制作完成。
 
按鈕的制作
        最后我們制作“開始計時”按鈕，打開菜單“視圖/工具欄/控件工具箱”，單擊“按鈕”工具，然后在幻燈片上拖動出一個按鈕，右擊該按鈕，打開屬性對話框，設置“caption”屬性為“開始計時”，關閉對話框，回到幻燈片頁面下，雙擊該按鈕，在出現(xiàn)的代碼窗口中輸入以下代碼:
Private Sub CommandButton1_Click()
ActivePresentation.SlideShowSettings.Run
SlideShowWindows(Index:=1).View.Next
End Sub
我們的制作全部完成，來檢驗一下成果吧，按“F5”放映幻燈片，然后單擊“開始計時”按鈕，計時開始，效果如圖所示。

小提示：在播放過程中，首先需要驗證該PowerPoint的宏安全級別是否為“低”，否則將無法調用計時功能。