張安龍

摘 要：為了在教學(xué)中讓簡(jiǎn)單的PowerPoint幻燈片變得更加生動(dòng)有趣，本文從用控件、鏈接、插件Swiff Point Player、Windows media player、對(duì)象、VBA控制共六個(gè)方面闡述了在PowerPoint中如何插入Flash，真正實(shí)現(xiàn)兩者完美組合，閃動(dòng)自如，從而進(jìn)一步提高教師現(xiàn)代教育技術(shù)能力。

關(guān)鍵詞：Flash動(dòng)畫；PowerPoint；VBA；課件制作

中圖分類號(hào)：G434 文獻(xiàn)標(biāo)識(shí)碼：B 文章編號(hào)：1673-8454（2009）02-0056-03

一、引言

如今教學(xué)環(huán)境的改進(jìn)可謂是突飛猛進(jìn)，不同的教學(xué)形式也在層出不窮的涌現(xiàn)，按照過去的方式方法上課恐怕很難滿足學(xué)生的“胃口”了。如何利用電子課件或電子教案，選擇一種能實(shí)現(xiàn)最好教學(xué)效果的多媒體電子教室，把課上得更生動(dòng)、更直觀、更易于學(xué)生理解、更富有時(shí)代氣息，應(yīng)是每位教師上課前必須思考的事情。

制作教學(xué)課件，運(yùn)用現(xiàn)代教學(xué)手段進(jìn)行素質(zhì)教育已經(jīng)成為當(dāng)前每位教師的一項(xiàng)基本技能，尤其是中青年教師必須具有的能力。雖然不可能每位教師都成為制作課件的高手，但是教師可以通過上網(wǎng)、研究?jī)?yōu)秀課件、遠(yuǎn)程資源、使用CAI教學(xué)光盤、觀摩優(yōu)質(zhì)課等方式，學(xué)習(xí)借鑒別人的經(jīng)驗(yàn)，取長(zhǎng)補(bǔ)短，少走彎路；充分發(fā)揮自己的主觀能動(dòng)性，發(fā)掘潛力，實(shí)行拿來主義，消化吸收，最終形成有自己特色的產(chǎn)品。

二、在PowerPoint中調(diào)用Flash動(dòng)畫，實(shí)現(xiàn)兩者完美結(jié)合

“工欲善其事，必先利其器”，我們知道，制作一款課件，最基本的前提就是要有一把制作課件的利器。PowerPoint易于上手，制作周期短，并支持IE瀏覽器，加上它編輯多媒體的功能比較強(qiáng)大，能夠滿足一般教學(xué)要求，已廣泛被授課老師所采用，成為制作課件的首選。

PowerPoint課件中，插入Flash動(dòng)畫已經(jīng)不是什么新鮮事了。本文就課件制作中如何把Flash和PowerPoint完美結(jié)合，實(shí)現(xiàn)真正地“閃動(dòng)自如”作一些說明，希望對(duì)初學(xué)者有所幫助。下面筆者介紹如何在PowerPoint中調(diào)用Flash動(dòng)畫。

1.用控件

打開PowerPoint程序，從系統(tǒng)菜單中打開“視圖（View)＼工具欄（Toolbars）＼控件工具箱（Control Toolbox）”，打開“控件工具箱”面板。在“控件工具箱（Control Toolbox）”面板中用鼠標(biāo)單擊“其他控件(other controls)”按鈕（即最后一個(gè)按鈕），打開系統(tǒng)安裝的ActiveX控件清單，選擇“Shockwave Flash Object”，此時(shí)光標(biāo)變成“十”字形。用鼠標(biāo)在幻燈片上拖出一個(gè)任意大小的區(qū)域，此時(shí)拖出的圖形呈矩形，以后Flash動(dòng)畫就將在其中播放。

在剛拖出的區(qū)域中，單擊鼠標(biāo)右鍵打開快捷菜單，選擇“屬性”。在打開的“屬性”窗口中選擇“自定義”。單擊“自定義”行右邊的按鈕，彈出“屬性頁”對(duì)話框，在對(duì)話框的第一行“Movie URL”欄中輸入Flash動(dòng)畫（*.swf）文件的完整的路徑（最好Flash文件與PowerPoint文件放在同一目錄，此時(shí)只輸入Flash動(dòng)畫的文件名就可以了），注意文件名后要加上擴(kuò)展名.swf，按［OK］按鈕退出。這個(gè)方法的好處是可以把動(dòng)畫嵌入PowerPoint，并隨意調(diào)整大小和位置。

2.用鏈接

將動(dòng)畫創(chuàng)建為EXE文件（Flash播放器的“文件”菜單下有此功能），然后在PowerPoint中插入一小圖片，右擊圖片，在彈出的菜單中選“動(dòng)作設(shè)置”，在對(duì)話框中選“運(yùn)行程序”，在地址欄中輸入創(chuàng)建的動(dòng)畫文件的地址和文件名（可以點(diǎn)“瀏覽”查找），確定后就OK了！將PowerPoint宏的安全性（工具＼宏＼安全性）設(shè)為最低的話可以直接打開EXE文件而不彈出對(duì)話框。

3.用插件Swiff Point Player

為了保證該插件能正常工作，系統(tǒng)中要保證安裝有PowerPoint，以及Macromedia Flash Player。 安裝完畢啟動(dòng)PowerPoint，你會(huì)發(fā)現(xiàn)在“插入”菜單中增加了一項(xiàng)“Flash Movie…”，另外，在繪圖工具欄中也增加了一個(gè)用于插入Flash動(dòng)畫的“Insert Flash movie”按鈕。

當(dāng)需要插入Flash動(dòng)畫時(shí)，單擊“插入”→“Flash Movie”項(xiàng)，然后在彈出的對(duì)話框中選中要插入的Flash動(dòng)畫文件，點(diǎn)擊“Insert”按鈕，即可將該動(dòng)畫文件讀取到幻燈片當(dāng)前位置并停留在第一幀畫面上。

小提示：該插件僅僅支持在PowerPoint幻燈片中（不支持Office其他組件）插入SWF格式的Flash動(dòng)畫，如果作品是EXE格式的，你需要使用其他轉(zhuǎn)換工具將其轉(zhuǎn)變?yōu)镾WF格式。

4.用“Windows media player”

具體方法是單擊“插入＼對(duì)象”，彈出的“對(duì)象”對(duì)話框，在對(duì)象類型中選擇“Windows media player”，單擊“確定”，這樣就在幻燈片上插入了一個(gè)“Windows media player”對(duì)象，右擊“Windows media player”對(duì)象，選擇“屬性”，在屬性對(duì)話框中單擊“自定義”右側(cè)的按鈕，彈出“Windows media player屬性”對(duì)話框，在“文件名或URL”中“瀏覽”選擇要插入的Flash文件（還可在下面的選項(xiàng)上進(jìn)行所需設(shè)置），單擊“確定”即可。

5.用對(duì)象包

首先，“插入＼對(duì)象＼包”，在對(duì)象類型中選擇“包”，單擊“確定”，這樣就在幻燈片上插入了一個(gè)“包”對(duì)象。然后在彈出“對(duì)象包裝程序”中選擇“文件＼導(dǎo)入” ，選擇要導(dǎo)入的Flash文件，退出對(duì)象包裝程序，“更新”選擇“是（y）”。最后右擊“包對(duì)象”，選擇“單擊鼠標(biāo)＼對(duì)象動(dòng)作＼激活內(nèi)容”， 確定即可。

6.用VBA控制

上面這些方法，插入的Flash還有一點(diǎn)不完美，那就是除非Flash文件中自己帶有播放進(jìn)度控制按鈕，否則會(huì)遇到一些尷尬的局面，比如切換到幻燈片后，想從頭開始播放Flash，它卻從剛才中斷的地方繼續(xù)播放。這時(shí)，用PowerPoint中的VBA就可以解決。解決問題的方法如下。

第一步，用方法一插入Flash影片，在“屬性”面板中作如下設(shè)置：“Movie”中填入所需的Flash影片名稱，“名稱”就用默認(rèn)的“ShockwaveFlash1”，這個(gè)名稱在后面的VBA編程中要用到。

第二步，插入命令按鈕。

（1）制作（播放）按鈕

在文檔中把光標(biāo)移動(dòng)到需要加入控制按鈕的位置，然后在工具欄中調(diào)出“控件工具箱”，點(diǎn)擊“命令按鈕”，在幻燈片中拖動(dòng)，即可拖出一個(gè)命令按鈕。調(diào)整好大小，在“屬性”面板中作如下設(shè)置：“名稱”中輸入“cmd_play”，“Caption”中輸入“播放”。雙擊該按鈕，進(jìn)入“Microsoft Visual Basic”編輯框，輸入如下內(nèi)容：

Private Sub cmd_play_Click()

ShockwaveFlash1.Playing = True

End Sub

（2）制作(暫停)、(前進(jìn))、(后退)、(返回)、(結(jié)束)按鈕

再用同樣的辦法按創(chuàng)建其它的按鈕?！皩傩浴泵姘逯蟹謩e作如下設(shè)置：暫停按鈕的“名稱”為“cmd_pause”，“Caption”為“暫?！?；前進(jìn)按鈕按鈕的“名稱”為“cmd_forward”，“Caption”為“前進(jìn)”；后退按鈕的“名稱”為“cmd_back”，“Caption”為“后退”；返回按鈕的“名稱”為“cmd_start”，“Caption”為“返回”；結(jié)束按鈕的“名稱”為“cmd_end”，“Caption”為“結(jié)束”。

分別為各個(gè)按鈕加上VBA，命令依次如下：

Private Sub cmd_pause_Click()

ShockwaveFlash1.Playing = False

End Sub

Private Sub cmd_forward_Click()

ShockwaveFlash1.FrameNum = ShockwaveFlash1.FrameNum + 30

ShockwaveFlash1.Playing = True

End Sub

Private Sub cmd_back_Click()

ShockwaveFlash1.FrameNum = ShockwaveFlash1.FrameNum - 30

ShockwaveFlash1.Playing = True

End Sub

Private Sub cmd_start_Click()

ShockwaveFlash1.FrameNum = 1

ShockwaveFlash1.Playing = True

End Sub

Private Sub cmd_end_Click()

ShockwaveFlash1.FrameNum = ShockwaveFlash1.TotalFrames

End Sub

關(guān)閉代碼窗口，返回幻燈片中，再點(diǎn)擊“控件工具箱”中的“退出設(shè)計(jì)模式”按鈕，試試點(diǎn)擊剛才制作的“播放”、“暫?！?、“返回”等按鈕，是不是起作用了？

說明：在(前進(jìn))、(后退)、(返回)按鈕中，后面均加上一條播放命令，是因?yàn)樵趯?shí)際應(yīng)用時(shí)，發(fā)現(xiàn)后面如果沒有播放命令的話，F(xiàn)lash影片會(huì)停止播放，所以這句是萬萬不可少的。

（3）播放幻燈片

看看按鈕是不是可以控制影片了呢？如果沒反應(yīng)，那一定是宏的安全性設(shè)得太高了，單擊“工具/宏/安全性”，將“安全級(jí)”設(shè)為“低”。重新打開PowerPoint就可以了。

三、結(jié)束語

每位老師都希望自己能在短時(shí)間內(nèi)制作出優(yōu)秀的課件，只要給自己壓力，并化壓力為動(dòng)力，不斷學(xué)習(xí)，制作出優(yōu)秀課件并非難事。

為了滿足如今信息化教學(xué)的需求，多媒體素材收集完成以后，就可以按照腳本的設(shè)計(jì)思路，將您所設(shè)想的“大樓”變?yōu)楝F(xiàn)實(shí)了。利用幻燈式演示軟件PowerPoint，將準(zhǔn)備好的素材有機(jī)組合起來，一步步地實(shí)現(xiàn)您自己制作多媒體課件的夢(mèng)想，發(fā)揮您的創(chuàng)造力吧！

(編輯：隗爽）