PowerPoint應(yīng)用和技巧

1、課件制作課件制作現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)以制作帶滾動條的文本框?yàn)槔榻B以制作帶滾動條的文本框?yàn)槔?，介紹“控件工具控件工具箱箱”在在PowerPointPowerPoint制作幻燈片中的應(yīng)用。制作幻燈片中的應(yīng)用。1 1打開控件工具箱打開控件工具箱新建一個幻燈片，選擇所需版面。點(diǎn)擊新建一個幻燈片，選擇所需版面。點(diǎn)擊“視圖工視圖工具欄具欄”-“-“控件工具箱控件工具箱”，或在任意工具欄或菜，或在任意工具欄或菜單欄上擊鼠標(biāo)右鍵，選擇單欄上擊鼠標(biāo)右鍵，選擇“控件工具箱控件工具箱”，打開，打開“控件箱工具箱控件箱工具箱”。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù) 飛天 歌

2、手:含笑 作詞：席時俊 作曲：萬軍 如果蒼海枯了 還有一滴淚 那也是為你空等的 一千個輪回 驀然回首中 斬不斷的牽牽絆絆 你所有的驕傲 只能在畫里飛 大漠的落日下 那吹簫的人是誰 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)文本框編輯區(qū)文本框編輯區(qū)2 2畫出文本框畫出文本框選擇選擇“控件工具箱控件工具箱”-“-“文本框文本框”選項(xiàng)，在編輯選項(xiàng)，在編輯區(qū)按住鼠標(biāo)左鍵拖拉出一個文本框，調(diào)整位置及區(qū)按住鼠標(biāo)左鍵拖拉出一個文本框，調(diào)整位置及大小。大小?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)3 3設(shè)置文本框?qū)傩栽O(shè)置文本框?qū)傩栽谠凇拔谋究蛭谋究颉鄙嫌覔羰髽?biāo)，選擇上右擊鼠標(biāo)，選擇“屬性屬性”，彈，彈出出“文本框文本框”屬性窗口。要實(shí)現(xiàn)滾動條

3、對文本屬性窗口。要實(shí)現(xiàn)滾動條對文本的控制，需要對文本框的一些屬性進(jìn)行設(shè)置。的控制，需要對文本框的一些屬性進(jìn)行設(shè)置。必須設(shè)置必須設(shè)置EnterKeyBehaviorEnterKeyBehavior屬性為屬性為TrueTrue，MultMultiLineiLine屬性為屬性為TrueTrue，并按需設(shè)置，并按需設(shè)置ScrollBarsScrollBars屬屬性。其他屬性可根據(jù)個人需要進(jìn)行設(shè)置。性。其他屬性可根據(jù)個人需要進(jìn)行設(shè)置。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)文文本本框框?qū)賹傩孕源按翱诳诂F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)EnterKeyBehaviorEnterKeyBehavior設(shè)為設(shè)為TrueTrue時允許使

4、用回車鍵時允許使用回車鍵換行。換行。MultiLineMultiLine設(shè)為設(shè)為TrueTrue時允許輸入多行文字。時允許輸入多行文字。ScrollBarsScrollBars是利用滾動條來顯示多行文字內(nèi)容，是利用滾動條來顯示多行文字內(nèi)容，其中其中1-fmScrollBarsHorzontal1-fmScrollBarsHorzontal為水平滾動條；為水平滾動條；2-fmScrollBarsVertical2-fmScrollBarsVertical為垂直滾動條；為垂直滾動條；3-fmS3-fmScrollBarsBothcrollBarsBoth為水平滾動條與垂直滾動條均存為水平滾動條與垂

5、直滾動條均存在。當(dāng)文字不超出文本框時，滾動條設(shè)置無效，在。當(dāng)文字不超出文本框時，滾動條設(shè)置無效，當(dāng)文字超出文本框時，則出現(xiàn)可拖動的滾動條。當(dāng)文字超出文本框時，則出現(xiàn)可拖動的滾動條。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)4 4輸入文本內(nèi)容輸入文本內(nèi)容右擊文本框，在右右擊文本框，在右鍵快捷菜單中選擇鍵快捷菜單中選擇“文本框?qū)ο笪谋究驅(qū)ο蟆?“編輯編輯”選項(xiàng)，即選項(xiàng)，即可進(jìn)行文本內(nèi)容的可進(jìn)行文本內(nèi)容的輸入，或按輸入，或按“CtrlCtrl+V”+V”把剪貼板上的把剪貼板上的文字拷貝到文本框文字拷貝到文本框中。中。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)5 5帶滾動條的文本框編輯完成帶滾動條的文本框編輯完成文本編輯完之后，在文本框

6、外任意處單擊左鍵退文本編輯完之后，在文本框外任意處單擊左鍵退出編輯狀態(tài)就完成了。出編輯狀態(tài)就完成了。帶滾動帶滾動條的文條的文本框本框 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)FlashFlash動畫插入動畫插入PowerPointPowerPoint中，通常有四種方法。中，通常有四種方法。（一）使用（一）使用“Shockwave Flash Object”Shockwave Flash Object”控件法控件法1 1打開打開“Shockwave Flash Object”Shockwave Flash Object”控件控件切換到要插入切換到要插入FlashFlash動畫的幻燈片，打開動畫的幻燈片，打開“控

7、件控件工具箱工具箱”-“-“其他控件其他控件”，彈出，彈出ActiveXActiveX控件窗控件窗口，窗口中列出了系統(tǒng)已經(jīng)安裝的所有口，窗口中列出了系統(tǒng)已經(jīng)安裝的所有ActiveXActiveX控件，在控件列表中找到控件，在控件列表中找到“Shockwave Flash Shockwave Flash Object”O(jiān)bject”?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)“Shockwave Flash Object” “Shockwave Flash Object” 控件控件 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)單擊單擊“Shockwave Flash Shockwave Flash Object”O(jiān)bject”，此時

8、系統(tǒng)會自，此時系統(tǒng)會自動關(guān)閉控件窗口。動關(guān)閉控件窗口。 將光標(biāo)移動到將光標(biāo)移動到PowerPoinPowerPoint t的編輯區(qū)域中，光標(biāo)變的編輯區(qū)域中，光標(biāo)變成成“十十”字形，按下鼠標(biāo)字形，按下鼠標(biāo)并拖動，畫出適當(dāng)大小的并拖動，畫出適當(dāng)大小的矩形框，這個矩形區(qū)域就矩形框，這個矩形區(qū)域就是播放動畫的區(qū)域。是播放動畫的區(qū)域。FlashFlash動畫的播放窗口動畫的播放窗口 2 2畫出畫出FlashFlash動畫的播放區(qū)域動畫的播放區(qū)域現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)3 3FlashFlash動畫的屬性設(shè)置動畫的屬性設(shè)置右擊矩形框，在出現(xiàn)的快捷菜單中單擊右擊矩形框，在出現(xiàn)的快捷菜單中單擊“屬性屬性”，出

9、現(xiàn)出現(xiàn)“屬性屬性”窗口。在窗口。在“movie”movie”選項(xiàng)中，輸入選項(xiàng)中，輸入FlFlashash動畫的完整路徑。或單擊動畫的完整路徑?；騿螕簟皩傩詫傩浴贝翱谥械拇翱谥械摹白远x自定義”一欄，此欄右端出現(xiàn)一個按鈕，單擊一欄，此欄右端出現(xiàn)一個按鈕，單擊該按鈕，出現(xiàn)該按鈕，出現(xiàn)“屬性頁屬性頁”窗口，在窗口，在“影片影片URLM”URLM”右側(cè)文本框中輸入右側(cè)文本框中輸入FlashFlash動畫的完整路徑，別的項(xiàng)動畫的完整路徑，別的項(xiàng)目采用系統(tǒng)默認(rèn)的即可。最后按目采用系統(tǒng)默認(rèn)的即可。最后按“確定確定”返回返回PowPowerPointerPoint?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)FlashFlash

10、動畫屬性窗口動畫屬性窗口FlashFlash動畫與動畫與PowerPointPowerPoint文件處于同一目錄中，也文件處于同一目錄中，也可只輸入可只輸入FlashFlash文件名，但必須文件名，但必須帶后綴名帶后綴名“.swf.swf”現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)FlashFlash動畫動畫“屬性頁屬性頁”窗口窗口現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)4 4FlashFlash動畫播放設(shè)置動畫播放設(shè)置放映該幻燈片，放映該幻燈片，F(xiàn)lashFlash動畫的畫面就出現(xiàn)了。設(shè)動畫的畫面就出現(xiàn)了。設(shè)定的矩形框的大小就是放映時動畫窗口的大小。定的矩形框的大小就是放映時動畫窗口的大小。通過拖動矩形框的句柄可隨意改變動畫

11、窗口的通過拖動矩形框的句柄可隨意改變動畫窗口的大小。大小。FlashFlash動畫播放時，鼠標(biāo)處在動畫播放時，鼠標(biāo)處在FlashFlash播放窗口，播放窗口，響應(yīng)響應(yīng)FlashFlash的鼠標(biāo)事件；處在的鼠標(biāo)事件；處在FlashFlash播放窗口外，播放窗口外，響應(yīng)響應(yīng)PowerPointPowerPoint的鼠標(biāo)事件。的鼠標(biāo)事件?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（二）插入對象法（二）插入對象法1 1插入插入FlashFlash動畫動畫切換到要插入切換到要插入FlashFlash動畫的幻燈片，單擊動畫的幻燈片，單擊“插入插入”-“-“對象對象”選項(xiàng)，彈出選項(xiàng)，彈出“插入對象插入對象”對話框，選對話框，

12、選擇擇“由文件創(chuàng)建由文件創(chuàng)建”，在出現(xiàn)的文本框中，通過單，在出現(xiàn)的文本框中，通過單擊擊“瀏覽瀏覽”或直接輸入或直接輸入FlashFlash動畫的完整路徑，動畫的完整路徑，最后單擊最后單擊“確定確定”返回返回PowerPointPowerPoint?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)“ “插入對象插入對象”控件對話框控件對話框2 2FlashFlash動畫圖標(biāo)調(diào)整動畫圖標(biāo)調(diào)整在幻燈片上出現(xiàn)了一個在幻燈片上出現(xiàn)了一個FlashFlash動畫的圖標(biāo)，調(diào)整圖動畫的圖標(biāo)，調(diào)整圖標(biāo)的大小和位置?？梢愿鶕?jù)需要隨意改變。標(biāo)的大小和位置?？梢愿鶕?jù)需要隨意改變?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)3 3FlashFlash動畫動作設(shè)置

13、動畫動作設(shè)置右擊該圖標(biāo)，在彈出的快捷菜單中單擊右擊該圖標(biāo)，在彈出的快捷菜單中單擊“動作設(shè)動作設(shè)置置”，出現(xiàn)，出現(xiàn)“動作設(shè)置動作設(shè)置”對話框。對話框。“激活對象激活對象”的方式可以是的方式可以是“單擊鼠標(biāo)單擊鼠標(biāo)”也可以是也可以是“鼠標(biāo)移鼠標(biāo)移動動”，本例采用，本例采用“單擊鼠標(biāo)單擊鼠標(biāo)”。再選中。再選中“單擊鼠單擊鼠標(biāo)標(biāo)”標(biāo)簽中的標(biāo)簽中的“對象動作對象動作”-“-“激活內(nèi)容激活內(nèi)容”，最，最后單擊后單擊“確定確定”返回返回PowerPointPowerPoint。如圖。如圖10-2710-27所示。所示?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)“ “動作設(shè)置動作設(shè)置”對話框?qū)υ捒? 4FlashFlash動畫

14、放映動畫放映放映該幻燈片，當(dāng)放映該幻燈片，當(dāng)鼠標(biāo)單擊鼠標(biāo)單擊FlashFlash動動畫圖標(biāo)時，出現(xiàn)一畫圖標(biāo)時，出現(xiàn)一個詢問框，單擊個詢問框，單擊“是是”，系統(tǒng)便會，系統(tǒng)便會調(diào)用調(diào)用FlashFlash播放程播放程序來播放動畫。序來播放動畫?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（三）超級鏈接法（三）超級鏈接法1 1建立鏈接對象建立鏈接對象切換到要插入切換到要插入FlashFlash動畫的幻燈片，在其中建立動畫的幻燈片，在其中建立任意一個對象（如一段文字、一張圖片等）。任意一個對象（如一段文字、一張圖片等）。2 2打開打開“插入超級鏈接插入超級鏈接”對話框?qū)υ捒蜻x中這個對象，單擊選中這個對象，單擊“插入插入”

15、菜單，在彈出的菜單，在彈出的下拉菜單中單擊下拉菜單中單擊“超級鏈接超級鏈接”，或右擊對象，或右擊對象，從彈出的快捷菜單中單擊從彈出的快捷菜單中單擊“超級鏈接超級鏈接”，此時，此時會彈出會彈出“插入超級鏈接插入超級鏈接”對話框，系統(tǒng)默認(rèn)鏈對話框，系統(tǒng)默認(rèn)鏈接到的對象是對話框左側(cè)上部的接到的對象是對話框左側(cè)上部的“原有文件或原有文件或W Webeb頁頁”?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)設(shè)置設(shè)置FlashFlash動畫的路徑動畫的路徑現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（四）動作設(shè)置法（四）動作設(shè)置法在需要設(shè)置鏈接的對象上右單擊，在彈出的快捷在需要設(shè)置鏈接的對象上右單擊，在彈出的快捷菜單中單擊菜單中單擊“動作設(shè)置動作

16、設(shè)置”，出現(xiàn)，出現(xiàn)“動作設(shè)置動作設(shè)置”對對話框，選擇激活對象的方式話框，選擇激活對象的方式“單擊鼠標(biāo)單擊鼠標(biāo)”或或“鼠鼠標(biāo)移動標(biāo)移動”，再選中，再選中“超級鏈接到超級鏈接到”單選按鈕，單單選按鈕，單擊右側(cè)朝下的小黑箭頭，在彈出的下拉列表中，擊右側(cè)朝下的小黑箭頭，在彈出的下拉列表中，單擊最下端的單擊最下端的“其他文件其他文件”，出現(xiàn)，出現(xiàn)“超級鏈接到超級鏈接到其他文件其他文件”對話框，設(shè)置好對話框，設(shè)置好FlashFlash動畫的路徑，動畫的路徑，單擊單擊“確定確定”返回返回PowerPointPowerPoint即可。即可?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)如果課件要求智能反饋，如填空題、選擇題如果課件

17、要求智能反饋，如填空題、選擇題或判斷題等，可利用控件搭建環(huán)境，利用或判斷題等，可利用控件搭建環(huán)境，利用VBAVBA編程，來實(shí)現(xiàn)復(fù)雜的智能交互。編程，來實(shí)現(xiàn)復(fù)雜的智能交互?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（一）常用控件的屬性設(shè)置（一）常用控件的屬性設(shè)置1 1復(fù)選框（復(fù)選框（CheckBoxCheckBox）可以選擇多個選項(xiàng)，常用來設(shè)計多選題；其屬可以選擇多個選項(xiàng)，常用來設(shè)計多選題；其屬性設(shè)置：性設(shè)置：AutoSizeAutoSize有兩個值，有兩個值，TrueTrue表示根據(jù)字的多少調(diào)表示根據(jù)字的多少調(diào)整復(fù)選框大小，整復(fù)選框大小，F(xiàn)alseFalse表示復(fù)選框?yàn)楣潭ù笮”硎緩?fù)選框?yàn)楣潭ù笮ackCol

18、orBackColor：設(shè)置復(fù)選框的背景顏色，單擊該：設(shè)置復(fù)選框的背景顏色，單擊該屬性框出現(xiàn)下拉按鈕，選擇屬性框出現(xiàn)下拉按鈕，選擇“調(diào)色板調(diào)色板”選項(xiàng)卡選項(xiàng)卡后選擇顏色；后選擇顏色；現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)CaptionCaption：控件的名稱，把默認(rèn)值刪除后，再：控件的名稱，把默認(rèn)值刪除后，再重新輸入新名稱；重新輸入新名稱；FontFont：設(shè)置字體、字號及字形，單擊該屬性框：設(shè)置字體、字號及字形，單擊該屬性框出現(xiàn)按鈕，單擊該按鈕出現(xiàn)字體對話框，再在出現(xiàn)按鈕，單擊該按鈕出現(xiàn)字體對話框，再在對話框中對字體格式設(shè)置；對話框中對字體格式設(shè)置；ForeColorForeColor：設(shè)置字的顏色，設(shè)

19、置方法同：設(shè)置字的顏色，設(shè)置方法同 BackColorBackColor；HeightHeight：復(fù)選框的高度，直接輸入數(shù)字即可；：復(fù)選框的高度，直接輸入數(shù)字即可；WidthWidth：復(fù)選框的寬度，直接輸入數(shù)字即可；：復(fù)選框的寬度，直接輸入數(shù)字即可；ValueValue：復(fù)選框的值，：復(fù)選框的值，TrueTrue為選中，相反為選中，相反FalseFalse則為未選中。則為未選中?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)2 2文本框（文本框（TextBoxTextBox）可以輸入文本，常用來設(shè)計填空題；其可以輸入文本，常用來設(shè)計填空題；其AutoSizeAutoSize、BackColorBackColor

20、、FontFont、ForeColorForeColor、HeightHeight、WidthWidth等等屬性的設(shè)置方法同復(fù)選框；屬性的設(shè)置方法同復(fù)選框；ValueValue：文本框的值，用來保存輸入的文本；：文本框的值，用來保存輸入的文本；TextAlignTextAlign：設(shè)置文本對齊方式。：設(shè)置文本對齊方式。3 3命令按鈕（命令按鈕（CommandButtonCommandButton）用來確定選擇或輸入，也可設(shè)計超級鏈接等；屬性用來確定選擇或輸入，也可設(shè)計超級鏈接等；屬性設(shè)置同復(fù)選框。設(shè)置同復(fù)選框?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)4 4單選框（單選框（OptionButtonOptionB

21、utton）只能選中一個選項(xiàng)，常用來設(shè)計單選題或判斷只能選中一個選項(xiàng)，常用來設(shè)計單選題或判斷題；除題；除ValueValue外，其他同復(fù)選框。外，其他同復(fù)選框。5 5標(biāo)簽（標(biāo)簽（LabelLabel）用來顯示文字信息。除用來顯示文字信息。除ValueValue外，其它同復(fù)選外，其它同復(fù)選框框 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)6 6消息框（消息框（MsgBoxMsgBox）常用消息框顯示一些交互的信息，如圖所示的消常用消息框顯示一些交互的信息，如圖所示的消息框用下面的語句可實(shí)現(xiàn)：息框用下面的語句可實(shí)現(xiàn)： MsgBoxMsgBox(“(“這是一個例題這是一個例題”,vbYesNo,vbYesNo,”,”示

22、例示例”) )用消息框顯示交互信息用消息框顯示交互信息現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)雙擊幻燈片中的控件，或用菜單雙擊幻燈片中的控件，或用菜單 “ “工具工具”-“宏宏”-“Visual basic-“Visual basic編輯器編輯器”命令，即可命令，即可進(jìn)入進(jìn)入VBAVBA編程狀態(tài)。進(jìn)入編程狀態(tài)。進(jìn)入VBAVBA后，需要在后，需要在“屬性屬性”窗口中對控件的屬性進(jìn)行設(shè)置。如果沒有出現(xiàn)窗口中對控件的屬性進(jìn)行設(shè)置。如果沒有出現(xiàn)“屬性屬性”窗口，按窗口，按F4F4鍵即可調(diào)出該窗口。鍵即可調(diào)出該窗口?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)二、制作智能交互型的課件二、制作智能交互型的課件以制作單選題、選擇題、判斷題和填

23、空題為例以制作單選題、選擇題、判斷題和填空題為例來介紹智能的課件的制作方法。來介紹智能的課件的制作方法?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（一）單選題的制作（一）單選題的制作1 1題目題目題目的輸入可用文本框，題目的輸入可用文本框，也可用標(biāo)簽。也可用標(biāo)簽。如果用文本框，直接輸入如果用文本框，直接輸入文本即可。如果用標(biāo)簽文本即可。如果用標(biāo)簽, ,插入后雙擊該標(biāo)簽啟動插入后雙擊該標(biāo)簽啟動VBVBA A，修改，修改CaptionCaption屬性為屬性為“5X-15=05X-15=0的解是：的解是：”，再根據(jù)需要修改其他屬性。再根據(jù)需要修改其他屬性。單選題的運(yùn)行界面單選題的運(yùn)行界面現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)2

24、2答案選項(xiàng)答案選項(xiàng)插入一個單選框（第一個單選框），修改其插入一個單選框（第一個單選框），修改其CaptionCaption屬性為屬性為“A 3”A 3”，其他屬性可自行，其他屬性可自行修改。其他的單選項(xiàng)可復(fù)制制作好的單選框，修改。其他的單選項(xiàng)可復(fù)制制作好的單選框，然后再分別修改它們的然后再分別修改它們的CaptionCaption屬性為屬性為“B B 5”5”、“C 11”C 11”和和“D 18”D 18”。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)3 3“查看答案查看答案”命令按鈕命令按鈕在此插入一個命令按鈕（第一個命令按鈕），在此插入一個命令按鈕（第一個命令按鈕），我們可根據(jù)單選框的我們可根據(jù)單選框的Va

25、lueValue屬性的值來判斷答屬性的值來判斷答案，如正確選項(xiàng)（單選框）的案，如正確選項(xiàng)（單選框）的ValueValue的值為的值為TrTrueue，則為該題選擇正確，否則為選擇錯誤，則為該題選擇正確，否則為選擇錯誤，另外還可根據(jù)選擇正誤來給出提示信息。另外還可根據(jù)選擇正誤來給出提示信息?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)用用MsgBoxMsgBox()()，如果選擇正確，顯示信息，如果選擇正確，顯示信息“Very Very GoodGood！請繼續(xù)！請繼續(xù)！”，選擇錯誤則顯示，選擇錯誤則顯示“SorrySorry，你選錯了！正確答案是你選錯了！正確答案是3 3，請繼續(xù)努力。，請繼續(xù)努力?！本呔唧w操作步

26、驟：雙擊單選框進(jìn)入體操作步驟：雙擊單選框進(jìn)入VBAVBA編輯窗口，編輯窗口，在編輯窗口中完成以下操作。在編輯窗口中完成以下操作?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)1 1）在編輯窗口中找到如下兩條語句：）在編輯窗口中找到如下兩條語句：Private Private Sub OptionButton1_Click()Sub OptionButton1_Click()和和End SubEnd Sub語句。語句。然后在上面這兩條語句中間插入以下語句：然后在上面這兩條語句中間插入以下語句：If OptionButton1.Value=True Then If OptionButton1.Value=True Th

27、en ex=MsgBox(“Veryex=MsgBox(“Very Good Good！請繼續(xù)努力。！請繼續(xù)努力?！? , vbOKOnlyvbOKOnly) )現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)方法方法1 1的代碼編輯窗口的代碼編輯窗口現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)2 2）同理，找到如下三組語句：）同理，找到如下三組語句：第一組語句：第一組語句：Private Sub OptionButton2Private Sub OptionButton2_Click()_Click()和和End SubEnd Sub；第二組語句：第二組語句：Private Sub OptionButton3Private Sub O

28、ptionButton3_Click()_Click()和和End SubEnd Sub；第三組語句：第三組語句：Private Sub OptionButton4Private Sub OptionButton4_Click()_Click()和和End SubEnd Sub。現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)在這三組的兩條語句中間分別插入語句：在這三組的兩條語句中間分別插入語句：If OptionButton2.Value=True Then ex=MsgBoxIf OptionButton2.Value=True Then ex=MsgBox(“(“正確答案是正確答案是3 3，請繼續(xù)努力。，請繼續(xù)

29、努力。”, vbOKOnly, vbOKOnly) )If OptionButton3.Value=True Then ex=MsgBoxIf OptionButton3.Value=True Then ex=MsgBox(“(“正確答案是正確答案是3 3，請繼續(xù)努力。，請繼續(xù)努力?！? vbOKOnly, vbOKOnly) )If OptionButton4.Value=True Then ex=MsgBoxIf OptionButton4.Value=True Then ex=MsgBox(“(“正確答案是正確答案是3 3，請繼續(xù)努力。，請繼續(xù)努力?！? vbOKOnly, vbOKOn

30、ly) )說明：說明：exex為自定義變量為自定義變量在所有代碼的前使用在所有代碼的前使用dim exdim ex定義變量定義變量exex現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)4 4“重新選擇重新選擇”命令按鈕命令按鈕在幻燈片適當(dāng)?shù)牡胤讲迦胍粋€命令按鈕，修改其在幻燈片適當(dāng)?shù)牡胤讲迦胍粋€命令按鈕，修改其CaptionCaption屬性為屬性為“重新選擇重新選擇”，在編輯窗口中的，在編輯窗口中的 Private Sub CommandButton2_Click()Private Sub CommandButton2_Click() 和和End SubEnd Sub語句間插入：語句間插入： OptionButto

31、n1.Value = FalseOptionButton1.Value = False OptionButton2.Value = False OptionButton2.Value = False OptionButton3.Value = False OptionButton3.Value = False OptionButton4.Value = False OptionButton4.Value = False Label2.Caption =“” Label2.Caption =“”現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)5 5“下一題下一題”命令按鈕命令按鈕在幻燈片適當(dāng)?shù)胤讲迦胍粋€命令按鈕，修改其

32、在幻燈片適當(dāng)?shù)胤讲迦胍粋€命令按鈕，修改其CaptionCaption屬性為屬性為“下一題下一題”，在編輯窗口中的，在編輯窗口中的 Private Sub CommandButton3_Click()Private Sub CommandButton3_Click() 和和End SubEnd Sub語句間插入語句間插入: :If MsgBoxIf MsgBox(“(“是否繼續(xù)是否繼續(xù)”, VbYesNo + VbQue, VbYesNo + VbQuestionstion, “, “下一題下一題”)= VbYes)= VbYes Then Then With SlideShowWindows(

33、1).View With SlideShowWindows(1).View GotoSlide GotoSlide 2 2 End With End With /2/2為第為第2 2張幻燈片，此語句表示轉(zhuǎn)到第張幻燈片，此語句表示轉(zhuǎn)到第2 2張幻燈張幻燈片片 End if End if 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)“ “重新選擇重新選擇”和和“下一題下一題”命令按鈕代碼編輯窗命令按鈕代碼編輯窗口口現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)如果要根據(jù)條件的不同轉(zhuǎn)到不同的幻燈片，可如果要根據(jù)條件的不同轉(zhuǎn)到不同的幻燈片，可用下面語句：用下面語句：If If 條件條件then then With SlideShowWindo

34、ws(1).View With SlideShowWindows(1).View .GotoSlide .GotoSlide n n /n/n為第為第n n張幻燈片，轉(zhuǎn)到第張幻燈片，轉(zhuǎn)到第n n張幻燈片張幻燈片 End WithEnd With End if End if 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)說明：條件可以是說明：條件可以是CaptionCaption屬性或?qū)傩曰騐alueValue屬性，屬性，書寫方法為：控件名稱書寫方法為：控件名稱( (在在VBAVBA中的名稱中的名稱).).屬性屬性= =(value(value屬性為屬性為TrueTrue或或FalseFalse，CaptionCap

35、tion屬性為具屬性為具體文本，注意文本要加雙引號體文本，注意文本要加雙引號) )，如下面語句：，如下面語句： If OptionButton1.Value=True thenIf OptionButton1.Value=True then End if End if表示如果單選框表示如果單選框1 1的的ValueValue值為值為TrueTrue，那么運(yùn)行，那么運(yùn)行t thenhen后的語句，一直到后的語句，一直到End ifEnd if。 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（二）多選題的制作（二）多選題的制作題目的設(shè)計同單選題。題目的設(shè)計同單選題。答案選項(xiàng)用復(fù)選框（答案選項(xiàng)用復(fù)選框（CheckBox

36、CheckBox），其他設(shè)置同），其他設(shè)置同單選題。單選題?！安榭创鸢覆榭创鸢浮泵畎粹o，因?yàn)槭嵌噙x題，答案命令按鈕，因?yàn)槭嵌噙x題，答案有多個，所以要書寫多個條件，條件之間用有多個，所以要書寫多個條件，條件之間用andand連接，表示同時滿足這幾個條件，比如第連接，表示同時滿足這幾個條件，比如第1 1、3 3選項(xiàng)是正確的，則需要輸入如下語句：選項(xiàng)是正確的，則需要輸入如下語句：現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)If CheckBox1.Value=True And CheckBox3.ValueIf CheckBox1.Value=True And CheckBox3.Value=True Then=Tr

37、ue Then 給出正確的提示信息同單選題給出正確的提示信息同單選題ElseElse 給出錯誤的提示信息同單選題給出錯誤的提示信息同單選題End if End if 現(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)（三）填空題的制作（三）填空題的制作點(diǎn)擊文本框控件，在幻燈片適當(dāng)?shù)奈恢猛侠簏c(diǎn)擊文本框控件，在幻燈片適當(dāng)?shù)奈恢猛侠髽?biāo)得到合適大小的文本框。選中該文本框，右標(biāo)得到合適大小的文本框。選中該文本框，右擊選擇擊選擇“查看代碼查看代碼”命令，打開代碼編輯窗口，命令，打開代碼編輯窗口，點(diǎn)擊右上方的下拉按鈕，在彈出的下拉列表中點(diǎn)擊右上方的下拉按鈕，在彈出的下拉列表中選擇選擇“LostFocusLostFocus”。這樣當(dāng)文本輸入完成、鼠標(biāo)離開這個文本框時，這樣當(dāng)文本輸入完成、鼠標(biāo)離開這個文本框時，就會出現(xiàn)在下面設(shè)置好的反饋信息。就會出現(xiàn)在下面設(shè)置好的反饋信息?，F(xiàn)代教育技術(shù)現(xiàn)代教育技術(shù)在代碼編輯窗口中找到在代碼編輯窗口中找到:Private Sub TextBox1_Lo:Private Sub TextBox1_LostFocus()stFocus()和和End SubEnd Sub語句語句, ,插入代碼：插入代碼：If TextBox1.Value =“If TextBox1.Val