萬盛學電腦網

您现在的位置: 萬盛學電腦網 >> 辦公室軟體 >  >> PowerPoint 教學 >> PPT 進階技巧

PowerPoint 2007 製作多選題互動測驗:核取方塊+VBA 程式碼自動判分

想在簡報內嵌互動測驗?PowerPoint 2007「開發工具」→「控制項」→「核取方塊」配合 VBA 巨集,可製作「多選題:選對顯示正確、選錯提示錯誤、重選鈕重置」完整互動邏輯。以下為完整實作步驟。

一、啟用開發工具索引標籤

Office 按鈕 →「PowerPoint 選項」→「常用」→ 勾選「在功能區顯示『開發工具』索引標籤」。

二、建立題目與選項核取方塊

  1. 編輯題目、背景、標題。
  2. 「開發工具」→「控制項」→「核取方塊 (ActiveX)」,在投影片放置選項 A、B、C、D 四個核取方塊。
  3. 右鍵各核取方塊 → 「屬性」→ 修改 Caption 為選項文字(如「A 蘇軾」、「B 李白」…)。

三、新增「提交」與「重選」命令按鈕

  1. 「開發工具」→「控制項」→「命令按鈕 (ActiveX)」,放置兩顆按鈕。
  2. 右鍵 → 「屬性」→ 修改 Caption 為「提交」、「重選」;Name 設為 CmdSubmit、CmdReset。

四、撰寫 VBA 判斷邏輯

  1. 雙擊「提交」按鈕進入 VBE 編輯器,於 CmdSubmit_Click() 撰寫:
If CheckBox1.Value = True And CheckBox4.Value = True Then
    MsgBox "選擇正確", vbOKOnly, "提示"
Else
    If CheckBox1.Value = True Or CheckBox4.Value = True Then
        MsgBox "選對了一個", vbOKOnly, "提示"
    Else
        MsgBox "選擇錯誤,正確答案是蘇軾和王安石", vbOKOnly, "提示"
    End If
End If
  1. 雙擊「重選」按鈕,於 CmdReset_Click() 撰寫:
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox3.Value = False
CheckBox4.Value = False

五、測試與部署

  1. 按 F5 放映,勾選選項點擊「提交」驗證彈窗訊息;點擊「重選」驗證核取方塊清空。
  2. 儲存為 .pptm (巨集啟用簡報),否則 VBA 不會執行。
  3. 受測者電腦需啟用「信任中心」→「巨集設定」→「啟用所有巨集」或將檔案放入「信任位置」。

進階擴充

  • 計分機制:累積分數寫入模組級變數,最後彈出總分。
  • 題庫隨機:從陣列隨機抽取題目動態生成控制項。
  • 結果回傳:配合 HTTP POST 送至學習管理系統 (LMS)。
copyright © 萬盛學電腦網 all rights reserved