【正文】 圖2 圖3 專業(yè)整理分享 。特別值得一提的是，如果您選擇了“透明框架”效果，圖形將失去填充色，由實體快速轉(zhuǎn)換為透明框架，這在幾何教學(xué)中是非常實用的。此外，您還可以選擇照明的亮度是“明亮”、“普通”還是“陰暗”。單擊〔方向〕按鈕，可以快速改變?nèi)S方向，還可以在透視效果和平行效果之間快速切換。圖1進(jìn)行3D演示 單擊〔設(shè)置/取消三維效果〕按鈕，可以實現(xiàn)平面圖形和立體圖形之間的快速切換。然后，單擊繪圖工具欄上的〔三維效果樣式〕按鈕，為自選圖形選擇一種立體效果。只要巧妙利用它的三維設(shè)置功能，同樣可以完成3D效果的逼真課件。執(zhí)行“視圖→工具欄→繪圖”命令，展開“繪圖”工具欄，按一下工具欄上的“選擇對象”按鈕，然后在多個對象外圍拖拉出一個框，將多個對象框在其中，同時選中多個需要對齊的對象，按“繪圖”工具欄上“繪圖(R)”按鈕，在隨后彈出一快捷菜單中，展開“對齊或分布”級聯(lián)菜單，選中其中一種對齊方式(如“右對齊”)即可。3．有了網(wǎng)格線，就可以輕松定位對象位置了。（二）用網(wǎng)格線定位對象當(dāng)我們在PPT幻燈片中添加了多個對象后，可以通過網(wǎng)格線來精確定位對象的位置：1．執(zhí)行“視圖→網(wǎng)格和參考線”命令，打開“網(wǎng)格和參考線”對話框。　　2．單擊任務(wù)窗格頂部的下拉按鈕，在隨后彈出的下拉列表中，選擇“幻燈片設(shè)計”選項，展開“幻燈片設(shè)計”任務(wù)窗格。ppt制作課件的常用技巧（一）20120502 13:05:00標(biāo)簽： PPT制作技巧分類：資源共享課件制作的常用技巧（一）使用設(shè)計方案　　通常情況下，新建的演示文稿使用的是黑白幻燈片方案，如果需要使用其他方案，一般可以通過應(yīng)用其內(nèi)置的設(shè)計方案來快速添加。 For Input As 2　　For i = 1 To Counter　　Input 2, SngScore(i)　　Next　　Close 2　　For i = 1 To Counter　　For j = 1 To Counter　　If SngScore(i) SngScore(j) Then　　a = SngScore(i): SngScore(i) = SngScore(j): SngScore(j) = a　　b = StrName(i): StrName(i) = StrName(j): StrName(j) = b　　End If　　Next　　Next　　er:　　End Sub　　新建一張幻燈片，用于顯示三等獎獲獎名單，按鈕名稱為CmdDisply，6個文本框的名稱為TxtThirdPrize1……TxtThirdPrize6。 For Input As 1　　For i = 1 To Counter　　Input 1, StrName(i)　　Next　　Close 1　　Open Path$ amp。模塊功能：讀取得分文件，并對得分加以排序　　Public Sub ReadDataInp()　　On Error GoTo er　　Open Path$ amp?！　?9。amp。第二張幻燈片顯示最后得分　　 = AverageScore　　39。將8個評委的分?jǐn)?shù)相加得出總分sum　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　sum = sum + CSng()　　39。清空下一張幻燈片的最后總分　　 = 　　End Sub　　39。全局變量，記錄組次，保存后自動加1　　Dim GroupNum As Integer　　39。全局變量，最后總分　　Dim sum As Single　　39?！　≡O(shè)計工作：打開VBA編輯器編寫代碼：　　39。　　評分系統(tǒng)主界面中包括8個評委的照片和每個評委給出的分?jǐn)?shù)（如圖），功能按鈕包括“清空”、“最后得分”?！　庸ぷ鳎盒陆ㄒ粡埧瞻谆脽羝?，在“視圖”菜單下找到“工具欄”子菜單，選擇其中的“控件工具箱”（大家也可根據(jù)實際需要改變主界面風(fēng)格）。制作即時評分系統(tǒng)（僅供參考）用PowerPoint內(nèi)嵌的VBA功能制作一個即時評分系統(tǒng)，現(xiàn)將制作過程與大家分享。　　按鈕的制作　　最后我們制作“開始計時”按鈕，打開菜單“視圖/工具欄/控件工具箱”，單擊“按鈕”工具，然后在幻燈片上拖動出一個按鈕，右擊該按鈕，打開屬性對話框，設(shè)置“caption”屬性為“開始計時”，關(guān)閉對話框，回到幻燈片頁面下，雙擊該按鈕，在出現(xiàn)的代碼窗口中輸入以下代碼:　　Private Sub CommandButton1_Click()　　　　SlideShowWindows(Index:=1).　　End Sub我們的制作全部完成，來檢驗一下成果吧，按“F5”放映幻燈片，然后單擊“開始計時”按鈕，計時開始，效果如圖13所示?！　∠旅嬖O(shè)置一下進(jìn)度條中各矩形的動畫，我們打開菜單“幻燈片放映/自定義動畫”在彈出的“自定義動畫”對話框中我們分別設(shè)置各矩形：動畫順序為兩個文本后面插入一個矩形，本例中的文本1對應(yīng)自定義動畫中的形狀2，依次類推，因為第一個文本框停留時間為0所以第一個矩形在第三個文本框后面，第二個矩形在第5個后面依此類推，本例中的第一個矩形對應(yīng)自定義動畫中的矩形33，所以在自定義動畫對話框中調(diào)整動畫順序為“形狀4”下面是“矩形33” “形狀6”下面是“矩形34”一直到“形狀32”的下面是“矩形47”，所有矩形的啟動動畫方式均為:“開始”方式為“之前”，“延遲”為1秒；所有矩形的效果為:“出現(xiàn)”，“動畫播放不變暗”。本例中是以百分比的形式顯示的，這里的進(jìn)度條是用矩形來實現(xiàn)，每2秒中進(jìn)度條變換一次(即每2秒出現(xiàn)一個矩形)，所以我們需要15個矩形塊?！　∽詈笪覀儾迦雰蓚€修飾性的文本框，輸入內(nèi)容分別為“距離結(jié)束還有”、“秒”，調(diào)整位置如圖2所示，至此動態(tài)時間顯示部分制作完成。啟動方式為:所有文本(文本1除外)為前一動畫“之后”延遲為“1秒”， 文本1為“單擊”起動，延遲為“0秒”，文本框的順序為:“文本1”、“文本2”一直到“文本31”。然后選擇“計時”標(biāo)簽，設(shè)置開始方式為“之后”，延遲為“1秒”?！　?. 在彈出的對話框中我們單擊要設(shè)置對象右面的下拉按紐，選擇“效果選項”命令。這里我們以設(shè)置一個文本框的自定義動畫效果為例來說明一下 操作步驟:　　1. 選擇要設(shè)置自定義動畫的文本框。實現(xiàn)的方法是:在幻燈片中插入文本框，文本框的內(nèi)容分別為3等這些數(shù)字，然后利用“自定義動畫”里面的“出現(xiàn)”效果對這些文本框進(jìn)行動畫設(shè)置，每一個對象在前一個對象出現(xiàn)后1秒出現(xiàn)。依次單擊“工具/宏/安全性”，然后將“安全級別”降為“低”即可?！　≥斎霕?biāo)題　　打開PowerPoint 2003，選擇“空演示文稿”，版式選為“只有標(biāo)題”，在標(biāo)題文本框中輸入“比賽計時系統(tǒng)”字體設(shè)置為“加粗”。要設(shè)計一個計時系統(tǒng)，要求能夠?qū)崟r顯示選手剩余時間。判斷題的制作所有的設(shè)置與單選題類似，只不過是設(shè)計兩個選項“√”和“”，這兩個符號可先在Word中插入，然后再復(fù)制過來。,Vbokonly）　　說明：ex為自定義變量　?。?）方法二　　在幻燈片合適的地方插入一標(biāo)簽，修改其Caption屬性為空，其他設(shè)置同方法一，只要把正確選項中的“then”后的語名改為“=Very Good!請繼續(xù)！”，錯誤選項的改為“=正確答案是3 ，請繼續(xù)努力。,Vbokonly)　　B. 同理，找到如下兩條語句：　　Private Sub OptionButton1_Click()　　End Sub　　在這兩條語句中間插入語句：　　If =True Then ex=MsgBox（正確答案是3 ，請繼續(xù)努力?！薄　〔僮鞑襟E：雙擊單選框進(jìn)入VBA，在編輯窗口中完成以下操作。　　3．查看答案命令按鈕在此使用命令按鈕，我們可根據(jù)單選框的Value屬性的值來判斷答案，如正確選項（單選框）的Value的值為True，則為該題選擇正確，否則為選擇錯誤，我們還可根據(jù)選擇正誤來給出信息，有兩種方法。圖12 2．選項　　插入一單選框，修改其Caption屬性為“0”，其他屬性可自行修改。如果用文本框，直接輸入文本即可。2．判斷正誤：因為是填空題，所填答案是文本，所以條件書寫為：　　if =正確的文本 then 給出正確的提示信息同單選題　　else　　給出錯誤的提示信息同單選題　　end if　　注意：正確的文本一定要用半角雙引號括起來，如幾個空一起判斷，方法同多選題3．[重新填空]命令按鈕：需要完成如下語句的設(shè)置：　　Private Sub CommandButton2_Click()　　 = 請雙擊后填入你的答案！　　End Sub　　Private Sub TextBox1_DblClick(ByVal Cancel As )　　 = 　　End Sub單選題的制作　　例如我們要設(shè)計如圖12所示的選擇題。多選題的制作1． 題目的設(shè)計同單選題2． 選項：用復(fù)選框（CheckBox)，其他設(shè)置同單選題。圖116．文本編輯完之后，在文字框外任意處單擊左鍵退出編輯狀態(tài)。要實現(xiàn)滾動條對文本的控制，必須設(shè)置EnterKeyBehavior屬性為True，MultiLine屬性為True，并按需設(shè)置ScrollBars屬性。當(dāng)文字不超出文字框時，滾動條設(shè)置無效，當(dāng)文字超出文字框時，則出現(xiàn)一個可拖動的滾動條（如圖10）。MultiLine屬性：設(shè)為True時允許輸入多行文字。4． 設(shè)置“文字框”屬性在“文字框”上擊鼠標(biāo)右鍵，選擇“屬性”，彈出“文字框”屬性窗口（如圖9），在屬性窗口中對文字框的一些屬性進(jìn)行設(shè)置。2．打開“控件箱工具箱”點擊[視圖]→[工具欄]→[控件工具箱]，或在任意工具欄或菜單欄上擊鼠標(biāo)右鍵，選擇“控件工具箱”。（5）命令按鈕　　 同標(biāo)簽。（3）單選框　　 屬性設(shè)置同復(fù)選框。下面我們就不同的控件，來說明常用屬性的設(shè)置方法。5．控件的主要屬性及設(shè)置方法　 進(jìn)入VBA后，需要在“屬性”窗口中對控件的屬性進(jìn)行設(shè)置。3．插入控件的方法　 單擊控件工具箱上的工具按鈕，然后在幻燈片中拖動到適當(dāng)大小即可。1．顯示控件工具箱　 在PowerPoint中選擇菜單“視圖/工具欄/控件工具箱”。所以本期我們?yōu)榇蠹野才帕艘粋€關(guān)于PowerPoint中VBA的小專題，以后在課件中實現(xiàn)交互就不會那么費勁了。此時，我們只要在“屏幕提示文字”欄中輸入需要提示的文字信息即可。這個效果在 方正奧思、Authware、flash等交互性強(qiáng)的制作工具中很容易實現(xiàn)，但在交互性差的PowerPoint中能否實現(xiàn)呢？經(jīng)過一番探究，筆者發(fā)現(xiàn)原來在PowerPoint中也可以實現(xiàn)提示文字功能，并且非常簡單。2．去掉鏈接文字的下劃線 如果想去掉鏈接文字的下劃線，可通過向幻燈片中插入一個新的文本框（不要使用幻燈片版式中自帶的文本框)，輸入文字標(biāo)題后，選中整個文本框再設(shè)置該文本框的超鏈接，這樣就看不到鏈接文字的下劃線了。這時當(dāng)你執(zhí)行超級鏈接時就會變成所設(shè)置的顏色了，而且在不同的計算機(jī)上演示效果都是一樣的。在菜單欄下的“格式”菜單中或在右鍵快捷菜單中選擇“幻燈片配色方案”命令，彈出“配色方案”對話窗，在“自定義”選項卡中，雙擊“強(qiáng)調(diào)文字和超級鏈接”左側(cè)的顏色塊（如圖4），在“強(qiáng)調(diào)文字和超級鏈接顏色”對話框中選擇適合的顏色；同樣雙擊“強(qiáng)調(diào)文字和尾隨超級鏈接”的顏色即可修改已訪問超級鏈接的顏色。1．更改鏈接文字的顏色 在PowerPoint 2003中，文本超級鏈接默認(rèn)顏色為淡紫色，已訪問的超級鏈接顏色為淺灰色。8．技巧：如果需要多個這樣的菜單，只需要選中兩個矩形，復(fù)制、粘貼，修改文字內(nèi)容就可以了。6．使用同樣的方法，給“矩形2”再添加一個“退出”→“消失”效果，并設(shè)置“觸發(fā)器”為“矩形1”。4．雙擊自定義動畫面板中效果欄里面剛才添加