ppt高級應(yīng)用1.docx

優(yōu)質(zhì)PPT實用制作指南（一）實例1：交互式電子試卷實例概述電子試卷是一些電子版的印有測試題目和答案的文稿。使用電子試卷組織者可以全面了解被測試者的知識和技能掌握程度。要創(chuàng)建交互式電子試卷，首先要創(chuàng)建一份試卷問題，答案，以及答案選擇的控制控件。本實例講解如何利用PowerPoint建立電子試卷，以及如何在PowerPoint中使用控件和VBA來實現(xiàn)問題答案的統(tǒng)計計算。實例制作流程：本實例需要用到PowerPoint的知識點包括：1導(dǎo)入Word文檔2大綱選項卡3項目符號設(shè)置4段落間距調(diào)整5控件繪制6設(shè)置控件格式和屬性7控件事件代碼編寫一、電子試卷題目的添加1將Word文檔中電子試卷題目及答案添加到幻燈片中利用“幻燈片（從大綱）”選項，把給定的Word文檔插入到幻燈片中PPT自動將Word文檔中每個段落作為一個大綱標(biāo)題生成多張幻燈片2使用大綱輕松劃分問題幻燈片使用“段落”組中的“提高列表級別”按鈕，將同類型問題合并到一張幻燈片中；設(shè)置“填空題”設(shè)置“單項選擇題”設(shè)置“多項選擇題”二、修飾電子試卷題目頁面為了使交互式電子試卷題目更加清晰、美觀，可以使用編號格式、段落格式等功能修飾電子試卷題目。1以編號替換題目前的項目符號設(shè)置編號的樣式為“1,2,3”大小為“110”顏色為“白色”2快速調(diào)整文本字號及段落間距為了使各試題間區(qū)分更明顯，用戶可以調(diào)整每個題目選項與下一題目之間的段落間距，還可以使用“自動調(diào)整選項功能”自動調(diào)整文本的字號大小，這樣可以避免因試題的文本內(nèi)容太多而溢出顯示區(qū)域。 為填空題頁面設(shè)置段落間距：段前和段后的值分別為768磅和12磅使用“自動調(diào)整選項功能”自動調(diào)整文本，并設(shè)置相應(yīng)題目的段后間距為18磅三、設(shè)置題目答案的交互式操作在設(shè)置好題目頁面后，若想實現(xiàn)答題與結(jié)果返回的智能交互式操作，必須在設(shè)置好題目幻燈片后為每個答案選項添加相應(yīng)的控制控件，然后借助VBA實現(xiàn)試卷答案分數(shù)統(tǒng)計。1使用文本框控件設(shè)置填空題在填空的區(qū)域添加文本框控件設(shè)置文本框控件的屬性：文本框名稱的修改通過復(fù)制控件添加其他文本框控件2使用選項按鈕控件設(shè)置單項選擇題在選項之前添加選項按鈕控件設(shè)置選項按鈕控件屬性a）更改控件的名稱b）BackStyle屬性設(shè)置“0-fmBackStyleTransparent”c）設(shè)置“Caption”屬性為清空通過復(fù)制添加其他選項按鈕控件由于在一組單選按鈕中，每次只能有一個正確選項，所以需要將每個題目單獨放置于一個新的幻燈片中復(fù)制幻燈片，將每個題目單獨放置在一個幻燈片中3使用復(fù)選框按鈕設(shè)置多項選擇題在選項之前添加復(fù)選框按鈕控件設(shè)置復(fù)選框按鈕控件屬性a）更改控件的名稱b）BackStyle屬性設(shè)置“0-fmBackStyleTransparent”c）設(shè)置“Caption”屬性為清空通過復(fù)制添加其他復(fù)選框按鈕控件優(yōu)質(zhì)PPT實用制作指南（二）3使用復(fù)選框按鈕設(shè)置多項選擇題在選項之前添加復(fù)選框按鈕控件設(shè)置復(fù)選框按鈕控件屬性a）更改控件的名稱b）BackStyle屬性設(shè)置“0-fmBackStyleTransparent”c）設(shè)置“Caption”屬性為清空通過復(fù)制添加其他復(fù)選框按鈕控件四、使用VBA自動判斷回答是否正確為交互式電子試卷中的各個答案項添加了控制控件之后，要想控件生效，還需要為每題的控件設(shè)置相應(yīng)的事件代碼。這樣就可以在交互式電子試卷中對題目進行回答后，即時給出相應(yīng)的提示，使被測者了解該題是否做對。1編寫所有文本框的改變事件代碼采用的VB語法結(jié)構(gòu)為：If 條件 then 語句1Else 語句2Endif解釋：如果條件為True，則執(zhí)行then部分的語句1，否則執(zhí)行else部分的語句2。2編寫所有單選按鈕控件的事件代碼：代碼如下（其它代碼編寫過程類似）Private Sub TwoC_Click（） If TwoC.Value = True Then MsgBox “選擇正確，請進入下一題測試！” Else MsgBox “選擇錯誤，請仔細閱讀題干！” End IfEnd Sub3編寫所