☆冷 平 梅松竹

（淮北師范大學數(shù)學與科學學院，安徽淮北 235000）

當今，利用PowerPoint制作CAI課件在中小學已經(jīng)很普及，然而許多教師對其智能交互性不夠熟悉，存在認識上的誤區(qū)。他們認為這是Authorware、Flash等軟件的專屬優(yōu)勢，而交互性差是PPT的弱點，他們對Flash、Authorware可以淋漓盡致地展現(xiàn)交互功能羨慕不已，然而苦于自己不會操作，只能是望而興嘆。今日的PowerPoint（以下簡稱PPT）已經(jīng)是鳥槍換炮，功能相當強大，只要我們進一步挖掘PPT的交互功能，對常見ActiveX控件有一定認識，并掌握簡單的VBA代碼，同樣可以輕松完成交互式CAI課件的制作。最難得是PPT操作十分便捷，可以說課堂教學使用PPT來制作CAI課件是最明智的選擇。

一、ActiveX控件及VBA代碼說明

1.ActiveX 控件工具

⑴控件工具箱的啟動：在PPT2003中是【視圖 ｜工具欄 ｜控件工具箱】，PPT2007中是【Office按鈕 ｜PowerPoint選項卡 ｜常用 ｜開發(fā)工具】。

⑵控件的生成：鼠標點選某控件，在編輯區(qū)點擊或拖曳即可。

⑶控件之屬性和事件：控件具備描述自身信息的屬性，如控件的名稱、具有的值、大小等；控件具備響應外界消息的事件，如當鼠標單擊控件時，控件的值會發(fā)生變化。鼠標右鍵單擊某控件，選擇【屬性】可以編輯該控件的屬性，選擇【查看代碼】可以編輯該控件的事件代碼。

2.關于 VBA

談及代碼，有些教師也許會覺得這些深奧的計算機語言令他們無所適從，實際上，在PPT中我們只需對VBA有一個初步認識并掌握幾個簡單的語句就可以了。說明如下：

⑴VBA（Visual Basic Application）是應用程序開發(fā)語言Vasual Basic的子集。由于已經(jīng)內(nèi)嵌到PowerPoint中，所以無須另外安裝，只要熟悉VBA編程就可以通過創(chuàng)建控件對象在幻燈片中使用。[1]

⑵VBA 代碼[2]。

①If…Then…Else語句：用來檢查一個條件的值是真還是假，如果是真，則執(zhí)行Then后面的操作，如果為假，則執(zhí)行Else后面的操作。

②點語法：格式為“控件名.控件屬性”，用來設置控件的某一屬性，放在If…Then語句之間作為條件。如Shockwave－Flash1.Playing＝True就是設置 Flash 控件的播放屬性為真，即播放。

③EndIf：結(jié)束條件檢查。

④Msgbox：消息框，在測試時顯示正誤信息。

制作交互式CAI課件就是基于ActiveX控件的屬性和事件，只要掌握常見ActiveX控件的重要屬性和事件，再了解一些VBA的基本技巧，就可輕松完成交互式CAI課件的制作。

二、制作示例

1.巧用命令按鈕控制Flash文件制作示例

在PPT中通過ShockwaveFlashObject控件插入Flash文件的方法我們大都掌握，但是此控件不能實時控制一般的Flash文件播放（除非Flash自身有播放、暫停等設置）。我們希望播放Flash文件時遇到精彩的部分可以暫停以便加以講解。通常我們采取對正在播放的Flash文件右擊選擇其快捷菜單的“播放”（此時播放前的“√”會消失，表示暫停播放），需要再次播放時需重復前面的操作，很不方便。甚至有的Flash文件在制作時隱藏了右鍵菜單，要實現(xiàn)暫停怎么辦呢？在這里我們可以采用命令按鈕控件對Flash文件進行輕松控制。實現(xiàn)方法如下：

⑴點擊控件工具箱中的命令按鈕，當鼠標變成“＋”形狀時在插入的Flash控件下方點擊即插入一個命令按鈕，選中它點擊右鍵快捷菜單中的屬性，將Caption項命名為“暫停”；同樣方法再插入一個命令按鈕，將Caption項命名為“播放”。其他常用屬性如BackColor（按鈕顏色）、Font（字體、字號、字形等）、ForeColor（字體顏色）等可根據(jù)個人喜好對按鈕進行修飾美化。

⑵雙擊暫停按鈕，在 VBA代碼窗口“PrivateSubCommand－Button1＿Click()”與“EndSub”（這是VBA程序設置好的程序段開始和結(jié)束的標志，我們只需在這兩行代碼中間填寫事件行為就可以了）之間輸入“ShockwaveFlash1.Playing＝False”（ShockwaveFlash1 是 插入的Flash控件名稱，注意不是Flash文件名稱），該語句即表示將設置前面的Flash播放屬性為假，即暫停。

⑶雙擊播放按鈕，在 VBA代碼窗口“PrivateSubCommandButton2＿Click()”與“EndSub”之間輸入“ShockwaveFlash1.Playing＝True”，該語句即表示將設置Flash的播放屬性為真，即播放。

這樣在幻燈片放映時，就可隨意切換暫停與播放按鈕來控制Flash的播放。

2.利用控件翻頁的制作示例

我們在幻燈片中插入的視頻文件、Flash動畫以及其他控件對象屬于高一級別的插件級別，在幻燈片播放時，這些高級別對象會跑到上層遮蓋低級別疊放的對象，使這些低級別的超級鏈接對象無法實現(xiàn)他們的作用。如果將視頻文件或Flash動畫文件的窗口放至滿屏，那么Slide頁面也會失去焦點，無法通過鼠標或鍵盤進行翻頁。這時我們可以通過添加控件來實現(xiàn)幻燈片的翻頁，具體做法如下：

⑴在當前幻燈片編輯窗口適當位置插入一個命令按鈕，將其Caption屬性項命名為“下一頁” ；插入第二個命令按鈕，將其Caption屬性項命名為“上一頁”。

⑵在“下一頁”命令按鈕的VBA代碼窗口“Private SubCommandButton1＿Click()”與“EndSub”之間輸入代碼：SlideShowWindows(1).View.Next （表示顯示當前幻燈片之后的幻燈片）；在“上一頁”命令按鈕的 VBA代碼窗口“PrivateSubCommandButton2＿Click()”與“EndSub”之間輸入代碼：SlideShowWindows(1).View.Previous（表示顯示當前幻燈片之前的幻燈片）。

同樣方法制作切換到指定幻燈片（SlideShowWindows(1).View.GotoSlide 5,msoFalse，即切換到第五張幻燈片）、切換到第一張幻燈片（SlideShowWindows(1).View.First）、切換到最后一張幻燈片的命令按鈕（SlideShowWindows(1).View.Last）等。

3.交互性單選題的制作示例

⑴在當前幻燈片編輯窗口中用文本框輸入單選題內(nèi)容，如“世界上第一臺計算機ENIAC誕生在：”。

⑵點擊控件工具箱中的選項按鈕，當鼠標變成“＋”形狀時在單選題下方點擊即插入一個選項按鈕控件。選中它并按住Ctrl＋D鍵復制出另外三個選項按鈕。分別選中四個選項按鈕并右鍵點擊選擇其快捷菜單中的屬性，把Caption項分別設置為A 1936年、B 1942年、C 1946年、D 1979年，并將四個選項按鈕設置頂端對齊及橫向分布。

⑶點擊控件工具箱中的命令按鈕，當鼠標變成“＋”形狀時在當前幻燈片編輯窗口適當位置點擊即插入一個命令按鈕，在其屬性對話框中把Caption項命名為“提交”，雙擊 “提交”，在VBA代碼窗口“PrivateSub Command－Button1＿Click()”與“EndSub”之間輸入代碼：If OptionButton3.Value ＝ True Then

MsgBox(″真棒，答對了！″) //(消息框顯示為“真棒，答對了！”)

⑷設置宏的安全級為“低”，預覽測試（以下實例制作完成后操作同此方法觀看響應效果）。

4.交互性多選題的制作示例

⑴在當前幻燈片編輯窗口中用文本框輸入多選題內(nèi)容，如“著名導演張藝謀執(zhí)導的電影有：”。

⑵在多選題下方插入一個復選框控件，并復制出另外三個復選框控件。分別將四個復選框控件的Caption屬性項設置為A紅高粱、B集結(jié)號、C 十面埋伏、D 三強拍案驚奇，并將四個復選框控件設置頂端對齊及橫向分布。

⑶在當前幻燈片編輯窗口適當位置插入一個命令按鈕，將其Caption屬性項命名為“提交”，在其VBA代碼窗口“PrivateSubCommand－Button1＿Click()”與“EndSub”之間輸入代碼：

5.交互性填空題的制作示例

⑴在當前幻燈片編輯窗口中用文本框輸入填空題內(nèi)容，如“2010年世博會召開地點是”。

⑵在填空題旁邊插入一個文本框控件和一個命令按鈕控件。將命令按鈕Caption屬性項命名為“提交答案”，在其 VBA窗口的 “PrivateSubCommandButton1＿Click()”與“EndSub”之間輸入代碼：

6.交互性判斷題的制作示例

⑴在當前幻燈片編輯窗口中用文本框輸入判斷題內(nèi)容，如“數(shù)據(jù)結(jié)構(gòu)就是研究數(shù)據(jù)庫結(jié)構(gòu)的課程”。

⑵在判斷題旁邊插入一個切換按鈕控件，將其Caption屬性項設置為“請判斷”。

⑶在當前幻燈片編輯窗口適當位置插入一個命令按鈕，將其Caption屬性項命名為“查看結(jié)果”，在其VBA窗 口 的 “PrivateSubCommandButton2＿Click ()” 與“EndSub”之間輸入代碼：

以上只介紹了常見交互性實例的制作方法，在PPT中還有很多的控件可以開發(fā)利用，其設計思想和方法是通用的。而且此方法制作出的CAI課件交互性效果毫不遜色于Authorware等專業(yè)軟件開發(fā)工具制作的課件。我們在掌握PowerPoint常規(guī)功能的同時，應充分挖掘PPT中的控件功能并熟悉VBA的應用，拓寬用PowerPoint制作課件的類型，提高課件的靈活性，以較少的投入開發(fā)出符合自身需求的功能更強的個性化教學課件[3]。

[1]鄭小軍.PowerPoint課件交互設計策略及實現(xiàn)[J].中國教育信息化,2008,(20).

[2]江建.應用PowerPoint控件,讓課件無限精彩[J].信息技術(shù)教育,2008,(2).

[3]馬致明,陳惠敏,張艷燕,趙紅梅.在PowerPoint中利用VBA制作交互式物理模擬課件[J].中國教育信息化,2008,(16).