編者按:
為了對參與“全國中小學信息技術創(chuàng)新與實踐活動”(簡稱NOC活動)之“優(yōu)秀課件評選”賽項的教師在課件制作方面進行指導,從本期起,《技術與應用》欄目每期將會推出一篇課件設計或技術指導文章,希望對大家有所幫助,也希望大家對本賽項給予更大的關注與支持(詳情請參閱www.noc.net.cn)。
PowerPoint的交互界面友好,操作方法簡單,是教師最常用于制作課件的軟件之一。教師可以在課件中插入視頻、音頻、動畫、圖片等多媒體素材,以增強課堂的生動性。但由于對PowerPoint控件不了解或者了解不夠,制作的課件與周邊軟件不能很好整合,操作的交互性不強。下面,筆者總結(jié)一些關于Power- Point控件的使用技巧,希望對廣大教師有所幫助。
在PowerPoint中插入Flash影片和控制Flash影片
Flash影片具有交互性強、文件小、來源廣泛的優(yōu)點,是教師在課件制作中最喜歡使用的多媒體素材。采用超級鏈接,點擊時彈出的可能帶有病毒的對話框總是讓人感到不安和厭煩,而用插入對象的方法,又會使人感到設置繁瑣和不方便控制。因此,使用控件插入Flash影片成了教師的首選方法。下面介紹利用控件的屬性設置和命令按鈕的VBA代碼可以很好地實現(xiàn)對Flash影片的播放、暫停等控制功能的方法。
1.使用控件插入Flash影片
(1)在PowerPoint中單擊菜單中的“視圖”選項,在下拉菜單中選擇“工具欄”的“控件工具箱”,選擇“其他控件”(扳手和榔頭圖標)按鈕(如圖)。在下拉控件列表中找到“Shockwave FlashObject”選項,出現(xiàn)“十”字光標,再將該光標移動到PowerPoint的編輯區(qū)域中,畫出適合大小的矩形區(qū)域,也就是播放動畫的區(qū)域,就會出現(xiàn)一個方框。
?。?)在這個框上單擊右鍵,點擊“屬性”菜單,出現(xiàn)屬性對話框,點擊“自定義”后的空白處會出現(xiàn)三個小點,點擊這三點,會出現(xiàn)屬性頁。在“影片URL”中輸入Flash影片的完整路徑和文件名(文件名.swf),或在屬性對話框的Movie后的空白處輸入Flash影片的路徑和文件名即可。
2.在PowerPoint中嵌入Flash影片
采用上述的方法插入的Flash影片是一個外部文件,與PPT文稿是兩個分別獨立的文件,要正常播放,需把Flash影片文件一起拷貝,并且保證Flash影片的文件路徑絕對正確。否則會在PPT幻燈片放映中顯示為空白,在單擊右鍵時出現(xiàn)“沒有加載影片”信息。為了避免出現(xiàn)這種情況和方便文件的發(fā)送,我們可以采用嵌入影片的方式,即在屬性頁設置中把嵌入影片復選框打鉤,或者在屬性對話框的EmbedMovie后選擇True。這樣保存后,F(xiàn)lash影片就作為內(nèi)部數(shù)據(jù)嵌入到PPT中了。只是這樣保存,其相應的PPT文件大小也隨之增大了。
3.使用命令按鈕的VBA代碼控制Flash影片
在播放插入的Flash影片時,遇到精彩的部分,我們希望暫停以便加以講解,常采用的方法是對正在播放的影片單擊右鍵,再點右鍵菜單的“播放”,需要再次播放時需重復前面的操作,很不方便。甚至有的Flash影片在制作時隱藏了右鍵菜單,要實現(xiàn)暫停怎么辦呢?我們同樣可以采用控件進行控制。
(1)從控件工具箱中拖兩個命令按鈕在插入的Flash影片方框下,修改屬性對話框中的Caption后名稱為“暫?!焙汀安シ拧?。其他屬性如BackColor(按鈕顏色)、ForeColor(字體顏色)、Font(字體或字號)可根據(jù)個人喜好修改。
(2)雙擊暫停按鈕,出現(xiàn)的VBA窗口,在“Private SubCommand- Button1_Click()”與“End Sub”之間輸入“ShockwaveFlash1.Playing =False”(ShockwaveFlash1是前面插入的Flash控件名稱,注意不是影片名稱,該語句設置前面的Flash影片播放屬性為假,即暫停)。
?。?)雙擊播放按鈕,在VBA窗口的“Private SubCommand Button1 _Click()”與“End Sub”之間輸入“ShockwaveFlash1.Playing =True”(設置Flash影片的播放屬性為真,即播放)。
這樣在幻燈片放映時,可隨時點擊暫停和播放按鈕來控制Flash影片的播放。
使用控件實現(xiàn)視頻的插入和播放控制
在使用視頻時,教師通常采用“插入→影片和聲音→文件中的影片”的方法插入視頻文件,這樣插入的視頻同樣存在著不好控制的缺點,比如音量大小的控制、是否全屏、定位播放等,使用控件插入的視頻則可以實現(xiàn)這些操作。
在其他控件列表中找到Windows Media Player控件,如果沒有則點擊“其他控件→注冊自定義空間”,找到C:\\Windows\\sys- tem32\\msdxm.ocx,確定后在其他控件列表中就會出現(xiàn)Windows Media Player控件。在PPT中拖出一個Windows Media Player控件,點擊右鍵菜單的“屬性”,在屬性對話框FileName后輸入需插入的視頻文件路徑和文件名(注意后綴名),這樣在幻燈片放映時,就能通過播放按鈕或者右鍵菜單控制需要播放的視頻。也可以采用ActiveMovie1 Control Object控件,在PPT中拖出一個ActiveMovie1Control Object控件,在屬性對話框的FileName后輸入需插入的視頻文件路徑和文件名,與Windows Media Player不同的是,該控件在播放時沒有音量控制滑塊。
使用控件實現(xiàn)多行滾動文本
在課件制作時,教師常遇到這樣的情況:一方面想把字號設置很大,以便讓學生看得更清楚,一方面又由于頁面大小限制,不能把一個知識點或題目與解題思路整體放在同一張幻燈片上,但如果把題目和解題思路分到兩張幻燈片中,講解起來很不方便。我們可以采用在題目下用控件控制滾動文本的方法解決這個問題。
打開“控件工具箱”,點擊“文本框”控件。在PPT編輯區(qū)按住鼠標左鍵拖拉出一個文本框,調(diào)整位置(如題目下)及大小。設置“文本框”屬性EnterKeyBehavior為True,允許使用回車鍵換行;MultiLine屬性為True,允許輸入多行文字;ScrollBars屬性為2-fmScrollBarsVertical(表示垂直滾動),這樣就可以用滾動條來顯示多行文字內(nèi)容了。其中,1-fmScroll- BarsHorzontal表示水平滾動,3-fmScrollBarsBoth表示水平滾動與垂直滾動均存在。其他屬性可根據(jù)需要進行設置,如BackColor用來設置文字框的背景顏色,TextAlign用來設置文字對齊方式等。右鍵單擊文字框,選擇“文字框?qū)ο蟆庉嫛?,在文字框中輸入文字,或者把所需文字從剪貼板上剪貼到文字框中。文本編輯完之后,在文字框外任意處單擊左鍵退出編輯狀態(tài)。在幻燈片放映時就可以通過拖動滾動條滑塊來顯示文字了。
智能交互測試題的制作
智能交互式試題一直是Flash、Authorware等軟件的優(yōu)勢,大多數(shù)教師對用Flash、Authorware制作的交互試題羨慕不已。然而苦于自己不會操作其他軟件,只能把答案設置成自定義動畫顯示出來。其實在PPT中應用控件和VBA代碼同樣可以制作出智能交互試題。說到代碼,有些教師也許會覺得這是一件頭痛的事,實際上我們只需掌握幾個簡單的語句就可以了。說明如下:
?、買f……Then……Else語句:用來檢查一個條件的值是真還是假,如果是真,則執(zhí)行Then后面的操作,如果為假,則執(zhí)行Else后面的操作。
?、邳c語法:格式為“控件名.控件屬性”,用來設置控件的某一屬性,放在If……Then語句之間作為條件。如前面提到的Shockwave- Flash1.Playing=True就是設置Flash控件的播放屬性為真,即播放。
③End If:結(jié)束條件檢查。
?、躆sgbox:消息框,在測試時顯示正誤信息。
1.交互填空題的制作
在PPT中拖出一個文本框控件和一個命令按鈕控件,把命令按鈕屬性中的Caption修改為“測試”,雙擊命令按鈕控件,在VB窗口的“Private Sub CommandButton1 _Click()”與“End Sub”之間輸入以下代碼:
If TextBox1.Text="1"Then(textbox1表示相應文本控件名稱,1表示正確答案)
hd=MsgBox("Yes")//(消息框顯示為Yes)
Else
hd=MsgBox("No")//(消息框顯示為No)
End If
我們也可以先在PPT編輯區(qū)內(nèi)拖出另一個文本框控件,把控件名稱改為“xiaoxi”,設置字體顏色屬性ForeColor為紅色,把上面的hd=MsgBox("Yes")代碼改為xiaoxi.Text=("Yes"),hd=Msg- Box("No")代碼改為xiaoxi.Text=("No"),就可以在一個文本框中顯示正誤信息了。
2.單項選擇題的制作
在PPT編輯窗口中拖出一個選項按鈕控件,按住Ctrl鍵拖動控件復制出三個,點擊右鍵,在屬性對話框中把名稱改為dx1、dx2、dx3、dx4,把Caption項設置A、B、C、D,分別把它們放在對應的選項前面。拖出一個命令按鈕控件,在屬性對話框中把Caption修改為“測試”,雙擊“測試”后輸入以下代碼:
Private Sub CommandButton1 _Click()
If dx1.Value = TrueThen
hd = MsgBox("非常正確")
Else
hd = MsgBox("錯誤,正確答案為A")
End If
End Sub
與填空題相同,也可以用變量文本框顯示正誤信息。
3.多項選擇題制作
在PPT編輯窗口中拖出一個復選框控件,按住Ctrl鍵拖動控件復制出三個,點擊右鍵,在屬性對話框中把名稱改為fx1、fx2、fx3、fx4,把Caption項設置為A、B、C、D,并把它們放在各選項的前面。拖出一個命令按鈕控件,在屬性對話框中把Caption修改為“測試”,雙擊“測試”后輸入以下代碼:
Private Sub CommandButton1 _Click()
If fx1.Value = True And fx3.Value = True Then
hd = MsgBox("非常正確")
Else
hd = MsgBox("錯誤,正確答案為A、C")
End If
End Sub
正誤消息顯示修改與前面相同。
4.判斷題的制作
判斷題的制作與單項選擇題的制作方法相同,只是設置兩個選項,即“正確”和“錯誤”。
在PPT中還有很多的控件可以開發(fā)利用,如日歷、標尺等。教師在制作PPT課件時要善于總結(jié)經(jīng)驗,把PPT中的控件使用充分應用起來,制作出更加精彩的多媒體課件。