ppt制作的課件，如果在實際教學中能夠增加人機交互功能的話，會大大提高課堂效率，促進學生對知識的理解，今天本人在此就利用ppt自帶的控件來制作人機交互的多項選擇題，詳細制作方法請看下文詳細介紹。

1、啟動ppt2003，執行視圖-工具欄-控件工具箱命令，調出控件工具箱，在主編輯區域你會看到該工具箱。

2、在控件工具箱里選擇復選框，然后在編輯區域按住左鍵拖動拉出一個復選框checkbox1，右鍵單擊該復選框從下拉菜單中選擇屬性，調出屬性對話框。

3、在屬性對話框中找到caption屬性修改其值為“ A、小球A的質量小于小球B的質量”，接著點擊font屬性修改字體為楷體，字形為常規，字號為三號，點擊確定按鈕，并設置auotsize為true。

4、選擇復選框然后復制三個，并依次修改其caption的值為“   B． 甲液體的密度小于乙液體的密度”、“ C．  在甲液體中小球A對容器底的壓力小于小球B對容器底的壓力”、"D．  小球A在甲液體中排開液體的質量大于在乙液體中排開液體的質量"。并調節四個選項的位置使布局美觀。

5、選擇工具箱里命令按鈕，在編輯區域拖拽出一個按鈕，修改其caption屬性值為“確定”，設置前景色為&H000080FF&，背景色為&H00FF80FF&，字體為“王羲之書法字體”，字號為一號。

6、雙擊確定按鈕進入代碼編輯區域，輸入代碼

If CheckBox1.Value = True And CheckBox2.Value = True And CheckBox3.Value = True And CheckBox4.Value = False Then

MsgBox ("答案正確")

ElseIf (CheckBox1.Value = True And CheckBox4.Value = False) Or (CheckBox2.Value = True And CheckBox4.Value = False) Or (CheckBox3.Value = True And CheckBox4.Value = False) Or (CheckBox1.Value = True And CheckBox2.Value = True And CheckBox4.Value = False) Then

MsgBox ("沒有選全")

Else

MsgBox ("答案錯誤")

End If

并進行調試運行。

7、選擇”確定“按鈕，然后再復制一個修改其caption屬性值為“重選”，接著雙擊該按鈕進入編輯區域，并輸入代碼