單詞教學(xué)是中小學(xué)英語教學(xué)的重要環(huán)節(jié)。在學(xué)習(xí)新單詞時，需要呈現(xiàn)英語單詞和中文對照；當(dāng)復(fù)習(xí)單詞時，需要先呈現(xiàn)英文單詞，再按需要呈現(xiàn)中文對照。本文應(yīng)這種教學(xué)需求，介紹在PowerPoint中利用控件和VBA程序開發(fā)“英語單詞學(xué)習(xí)與復(fù)習(xí)”課件的方法。
　　
　　一、課件演示幻燈片界面與功能簡介
　　
　　單詞選自北京市義務(wù)教育課程改革實驗教材（九年級）Unit 1的Lesson 1～4（單詞數(shù)分別為：16、18、14、9個）。課件將各課中每4個單詞視為1組。新單詞順序?qū)W習(xí)幻燈片（Slide2）界面（如下圖），采用“標(biāo)題和兩欄文本”版式：“標(biāo)題區(qū)”含標(biāo)題、供輸入所學(xué)單詞的課號（txtLessonNum）和組號（txtGroupNum）文本框；“左欄文本區(qū)”含“English”、等號、放置4個英文單詞的文本框（txtEnglish1～4）；“右欄文本區(qū)”含“中文”和放置中文對照的文本框（txtChinese1～4）；底部安排了“開始學(xué)習(xí)新詞（StudyNewWords）”、“學(xué)習(xí)后續(xù)新詞（StudyNextWords）”和“清除全部（ClearAll）”3個按鈕；右上角圖標(biāo)對應(yīng)Microsoft Office Spreadsheet 11.0控件數(shù)據(jù)源（WordList），放置有Lesson 1～4各課新詞。在VBA編輯器窗口單擊F4鍵后，幻燈片及所有控件名稱均可在“屬性”窗口修改。新單詞順序復(fù)習(xí)幻燈片（Slide3）界面布局類似于Slide2，只是“開始復(fù)習(xí)新詞”和“復(fù)習(xí)后續(xù)新詞”按鈕實現(xiàn)的功能略異。
　　
　　
　　二、VBA程序的設(shè)計與編制
　　
　　請讀者注意前兩個事件的對應(yīng)代碼在單詞課號和組號內(nèi)容為“空、不全為數(shù)字或數(shù)字不合適”的情況下相關(guān)容錯與提示信息的處理方法。
　　
　　1.Slide2和Slide3通用變量聲明
　　Dim I As Integer
　　Dim arrGroupNum As Variant'存放各課的單詞組數(shù)
　　Dim intLessonNum As Integer'存放當(dāng)前課程的序號
　　
　　2.Slide2和Slide3檢查用戶輸入內(nèi)容是否合理的無參函數(shù)
　　Private Function ChkInput() As Boolean '初始化各課的單詞組數(shù)
　　 arrGroupNum = Arra