1、如何在PPT中一頁顯示較多文本內(nèi)容,電信系未參加新生心理測量名單,90項(xiàng)癥狀清單 910701105 黃燕玲 女 2009-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 910704217 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-11-

2、3,如果一頁中，只有8條相關(guān)記錄的時(shí)候,電信系未參加新生心理測量名單,90項(xiàng)癥狀清單 910701105 黃燕玲 女 2009-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 910704217 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-1

3、1-3 90項(xiàng)癥狀清單 910704224 馮劍 男 2009-11-3 90項(xiàng)癥狀清單 910704226 韓飛 男 2009-11-3 90項(xiàng)癥狀清單 910706123 陳俊偉 男 2009-11-3 90項(xiàng)癥狀清單 910706131 蔡建輝 男 2009-11-3 90項(xiàng)癥狀清單 910706134 余志鋒 男 2009-11-3 90項(xiàng)癥狀清單 910706143 劉藝生 男 2009-11-3 90項(xiàng)癥狀清單 910706208 胡少嘉 男 2009-11-3,如果一頁中，有15條相關(guān)記錄的時(shí)候,電信系未參加新生心理測量名單,90項(xiàng)癥狀清單 910701105 黃燕玲 女 200

4、9-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 910704217 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-11-3 90項(xiàng)癥狀清單 910704224 馮劍 男 2009-11-3 90項(xiàng)癥狀清單 910704226 韓飛 男 20

5、09-11-3 90項(xiàng)癥狀清單 910706123 陳俊偉 男 2009-11-3 90項(xiàng)癥狀清單 910706131 蔡建輝 男 2009-11-3 90項(xiàng)癥狀清單 910706134 余志鋒 男 2009-11-3 90項(xiàng)癥狀清單 910706143 劉藝生 男 2009-11-3 90項(xiàng)癥狀清單 910706208 胡少嘉 男 2009-11-3 90項(xiàng)癥狀清單 910701105 黃燕玲 女 2009-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真

6、 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 910704217 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-11-3 90項(xiàng)癥狀清單 910704224 馮劍 男 2009-11-3 90項(xiàng)癥狀清單 910704226 韓飛 男 2009-11-3 90項(xiàng)癥狀清單 910706123 陳俊偉 男 2009-11-3 90項(xiàng)癥狀清單 910706131 蔡建輝 男 2009-11-3 90項(xiàng)癥狀清單 910706134 余

7、志鋒 男 2009-11-3 90項(xiàng)癥狀清單 910706143 劉藝生 男 2009-11-3 90項(xiàng)癥狀清單 910706208 胡少嘉 男 2009-11-3,如果一頁中，有30條相關(guān)記錄的時(shí)候,電信系未參加新生心理測量名單,90項(xiàng)癥狀清單 910701105 黃燕玲 女 2009-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 91070421

8、7 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-11-3 90項(xiàng)癥狀清單 910704224 馮劍 男 2009-11-3 90項(xiàng)癥狀清單 910704226 韓飛 男 2009-11-3 90項(xiàng)癥狀清單 910706123 陳俊偉 男 2009-11-3 90項(xiàng)癥狀清單 910706131 蔡建輝 男 2009-11-3 90項(xiàng)癥狀清單 910706134 余志鋒 男 2009-11-3 90項(xiàng)癥狀清單 910706143 劉藝生 男 2009-11-3 90項(xiàng)癥狀清單 91070

9、6208 胡少嘉 男 2009-11-3 90項(xiàng)癥狀清單 910701105 黃燕玲 女 2009-11-3 90項(xiàng)癥狀清單 910701107 林婷婷 女 2009-11-3 90項(xiàng)癥狀清單 910701121 江帆 男 2009-11-3 90項(xiàng)癥狀清單 910704202 蔡小真 女 2009-11-3 90項(xiàng)癥狀清單 910704213 唐穎 女 2009-11-3 90項(xiàng)癥狀清單 910704217 殷雪 女 2009-11-3 90項(xiàng)癥狀清單 910704220 陳阿洪 男 2009-11-3 90項(xiàng)癥狀清單 910704223 范生全 男 2009-11-3 90項(xiàng)癥狀清單 91

10、0704224 馮劍 男 2009-11-3 90項(xiàng)癥狀清單 910704226 韓飛 男 2009-11-3 90項(xiàng)癥狀清單 910706123 陳俊偉 男 2009-11-3 90項(xiàng)癥狀清單 910706131 蔡建輝 男 2009-11-3 90項(xiàng)癥狀清單 910706134 余志鋒 男 2009-11-3 90項(xiàng)癥狀清單 910706143 劉藝生 男 2009-11-3 90項(xiàng)癥狀清單 910706208 胡少嘉 男 2009-11-3,如果調(diào)整字體到合適的大小，結(jié)果,解決問題的方法,問題：文字或者行數(shù)過多，無法在一頁中按照正常字體顯示 方法：插入一個(gè)帶滾動(dòng)條的文本框 步驟： 打開控

11、件工具欄 插入文本框 設(shè)置文本框的“滾動(dòng)條”屬性 設(shè)置文本框的“文字大小”屬性,電信系未參加新生心理測量名單,步驟相關(guān)截圖,打開控件工具欄,滾動(dòng)屬性,行為屬性,編輯文字對象,如何在PPT中做多種類型的交互練習(xí)題,如果課件要求智能反饋，如填空題、選擇題或判斷題等，可利用控件搭建環(huán)境，利用VBA編程，來實(shí)現(xiàn)復(fù)雜的智能交互。,下列哪一本書的作者不是酈波老師？,如果課件要求智能反饋，如填空題、選擇題或判斷題等，可利用控件搭建環(huán)境，利用VBA編程，來實(shí)現(xiàn)復(fù)雜的智能交互。,用VBA制作智能交互型的課件,（一）常用控件的屬性設(shè)置 1復(fù)選框（CheckBox） 可以選擇多個(gè)選項(xiàng)，常用來設(shè)計(jì)多選題；其屬性設(shè)置：

12、 AutoSize有兩個(gè)值，True表示根據(jù)字的多少調(diào)整復(fù)選框大小，F(xiàn)alse表示復(fù)選框?yàn)楣潭ù笮?BackColor：設(shè)置復(fù)選框的背景顏色，單擊該屬性框出現(xiàn)下拉按鈕，選擇“調(diào)色板”選項(xiàng)卡后選擇顏色；,一、VBA編程基礎(chǔ),Caption：控件的名稱，把默認(rèn)值刪除后，再重新輸入新名稱； Font：設(shè)置字體、字號及字形，單擊該屬性框出現(xiàn)按鈕，單擊該按鈕出現(xiàn)字體對話框，再在對話框中對字體格式設(shè)置； ForeColor：設(shè)置字的顏色，設(shè)置方法同 BackColor； Height：復(fù)選框的高度，直接輸入數(shù)字即可； Width：復(fù)選框的寬度，直接輸入數(shù)字即可； Value：復(fù)選框的值，True為選中，相

13、反False則為未選中。,一、VBA編程基礎(chǔ),2文本框（TextBox） 可以輸入文本，常用來設(shè)計(jì)填空題；其AutoSize、BackColor、Font、ForeColor、Height、Width等屬性的設(shè)置方法同復(fù)選框； Value：文本框的值，用來保存輸入的文本； TextAlign：設(shè)置文本對齊方式。 3命令按鈕（CommandButton） 用來確定選擇或輸入，也可設(shè)計(jì)超級鏈接等；屬性設(shè)置同復(fù)選框。,一、VBA編程基礎(chǔ),4單選框（OptionButton） 只能選中一個(gè)選項(xiàng)，常用來設(shè)計(jì)單選題或判斷題；除Value外，其他同復(fù)選框。 5標(biāo)簽（Label） 用來顯示文字信息。除Valu

14、e外，其它同復(fù)選框,一、VBA編程基礎(chǔ),6消息框（MsgBox） 常用消息框顯示一些交互的信息，如圖所示的消息框用下面的語句可實(shí)現(xiàn)： MsgBox(“這是一個(gè)例題”,vbYesNo,”示例”),用消息框顯示交互信息,一、VBA編程基礎(chǔ),雙擊幻燈片中的控件，或用菜單 “工具”-“宏”-“Visual basic編輯器”命令，即可進(jìn)入VBA編程狀態(tài)。進(jìn)入VBA后，需要在“屬性”窗口中對控件的屬性進(jìn)行設(shè)置。如果沒有出現(xiàn)“屬性”窗口，按F4鍵即可調(diào)出該窗口。,（二）VBA的編程環(huán)境,二、制作智能交互型的課件 以制作單選題、選擇題、判斷題和填空題為例來介紹智能的課件的制作方法。,二、制作智能交互型的課件

15、,（一）單選題的制作 1題目 題目的輸入可用文本框，也可用標(biāo)簽。 如果用文本框，直接輸入文本即可。如果用標(biāo)簽,插入后雙擊該標(biāo)簽啟動(dòng)VBA，修改Caption屬性為“5X-15=0的解是：”，再根據(jù)需要修改其他屬性。,單選題的運(yùn)行界面,二、制作智能交互型的課件,2答案選項(xiàng) 插入一個(gè)單選框（第一個(gè)單選框），修改其Caption屬性為“A 3”，其他屬性可自行修改。其他的單選項(xiàng)可復(fù)制制作好的單選框，然后再分別修改它們的Caption屬性為“B 5”、“C 11”和“D 18”。,二、制作智能交互型的課件,3“查看答案”命令按鈕 在此插入一個(gè)命令按鈕（第一個(gè)命令按鈕），我們可根據(jù)單選框的Value屬性

16、的值來判斷答案，如正確選項(xiàng)（單選框）的Value的值為True，則為該題選擇正確，否則為選擇錯(cuò)誤，另外還可根據(jù)選擇正誤來給出提示信息，有兩種方法。,二、制作智能交互型的課件,（1）方法一 用MsgBox()，如果選擇正確，顯示信息“Very Good！請繼續(xù)！”，選擇錯(cuò)誤則顯示“Sorry，你選錯(cuò)了！正確答案是3，請繼續(xù)努力。”具體操作步驟：雙擊單選框進(jìn)入VBA編輯窗口，在編輯窗口中完成以下操作。,二、制作智能交互型的課件,1）在編輯窗口中找到如下兩條語句：Private Sub OptionButton1_Click()和End Sub語句。 然后在上面這兩條語句中間插入以下語句： If O

17、ptionButton1.Value=True Then ex=MsgBox(“Very Good！請繼續(xù)努力?！? vbOKOnly),二、制作智能交互型的課件,方法1的代碼編輯窗口,二、制作智能交互型的課件,2）同理，找到如下三組語句： 第一組語句：Private Sub OptionButton2_Click()和End Sub； 第二組語句：Private Sub OptionButton3_Click()和End Sub； 第三組語句：Private Sub OptionButton4_Click()和End Sub。,二、制作智能交互型的課件,在這三組的兩條語句中間分別插入語句：

18、If OptionButton2.Value=True Then ex=MsgBox(“正確答案是3，請繼續(xù)努力?！? vbOKOnly) If OptionButton3.Value=True Then ex=MsgBox(“正確答案是3，請繼續(xù)努力?！? vbOKOnly) If OptionButton4.Value=True Then ex=MsgBox(“正確答案是3，請繼續(xù)努力?！? vbOKOnly) 說明：ex為自定義變量 在所有代碼的前使用dim ex定義變量ex,二、制作智能交互型的課件,二、制作智能交互型的課件,（2）方法二 在幻燈片合適的地方插入一個(gè)標(biāo)簽（第二個(gè)標(biāo)簽），

19、修改其Caption屬性為空，其他設(shè)置同方法一，只要把正確選項(xiàng)中的“then”后的語句名改為“Label2.Caption=”Very Good!請繼續(xù)！”，三個(gè)錯(cuò)誤選項(xiàng)的“then”分別改為“Label2.Caption=”正確答案是3，請繼續(xù)努力。”即可。,方法2的代碼編輯窗口,二、制作智能交互型的課件,4“重新選擇”命令按鈕 在幻燈片適當(dāng)?shù)牡胤讲迦胍粋€(gè)命令按鈕，修改其Caption屬性為“重新選擇”，在編輯窗口中的 Private Sub CommandButton2_Click() 和End Sub語句間插入： OptionButton1.Value = False OptionBut

20、ton2.Value = False OptionButton3.Value = False OptionButton4.Value = False Label2.Caption =“”,二、制作智能交互型的課件,5“下一題”命令按鈕 在幻燈片適當(dāng)?shù)胤讲迦胍粋€(gè)命令按鈕，修改其Caption屬性為“下一題”，在編輯窗口中的 Private Sub CommandButton3_Click() 和End Sub語句間插入: If MsgBox(“是否繼續(xù)”, VbYesNo + VbQuestion, “下一題”)= VbYes Then With SlideShowWindows(1).View

21、 GotoSlide 2 End With /2為第2張幻燈片，此語句表示轉(zhuǎn)到第2張幻燈片 End if,二、制作智能交互型的課件,“重新選擇”和“下一題”命令按鈕代碼編輯窗口,二、制作智能交互型的課件,如果要根據(jù)條件的不同轉(zhuǎn)到不同的幻燈片，可用下面語句： If 條件then With SlideShowWindows(1).View .GotoSlide n /n為第n張幻燈片，轉(zhuǎn)到第n張幻燈片 End With End if,二、制作智能交互型的課件,說明：條件可以是Caption屬性或Value屬性，書寫方法為：控件名稱(在VBA中的名稱).屬性=(value屬性為True或False，

22、Caption屬性為具體文本，注意文本要加雙引號)，如下面語句： If OptionButton1.Value=True then End if 表示如果單選框1的Value值為True，那么運(yùn)行then后的語句，一直到End if。,二、制作智能交互型的課件,（二）多選題的制作 題目的設(shè)計(jì)同單選題。 答案選項(xiàng)用復(fù)選框（CheckBox），其他設(shè)置同單選題。 “查看答案”命令按鈕，因?yàn)槭嵌噙x題，答案有多個(gè)，所以要書寫多個(gè)條件，條件之間用and連接，表示同時(shí)滿足這幾個(gè)條件，比如第1、3選項(xiàng)是正確的，則需要輸入如下語句：,二、制作智能交互型的課件,If CheckBox1.Value=True And CheckBox3.Value=True Then 給出正確的提示信息同單選題 Else 給出錯(cuò)誤的提示信息同單選題 End if,二、制作智能交互型的課件,（三）判斷題的制作 所有的設(shè)置與單選題類似，只不