抑郁症官方测试题_在PowerPoint中制作交互式测试题的三种方法
随着计算机辅助教学的迅速发展与广泛应用，多媒体课件成为教学过程实现的重要途径与手段。交互式测试题作为多媒体课件的重要环节，很多教师认为需要通过Authorware或Flash才能实现。本文介绍三种在PowerPoint中制作交互式测试题的方式，简单实用便于实现。下面我们以一道高中信息技术课程试题为例，分别应用三种方式来制作交互式测试题。
例：使用电脑既能听音乐，又能看影碟，这是利用了计算机的（ ）。
A.多媒体技术 B.信息管理技术
C.自动控制技术 D.人工智能技术
正确答案为A。
一、利用超链接的方法制作交互式测试题
1.新建一个空白PPT文档，录入题目与选项，并用自选图形制作每个选项对应的按钮。
2.完善该幻灯片的色彩、构图、搭配等并将该幻灯片作为样本幻灯片，复制后粘贴两次形成模式相同的三张幻灯片。
3.在第二张、第三张幻灯片合适位置分别插入文字“恭喜你回答正确”、“回答错误，请仔细考虑重新作答”。
4.选择“幻灯片放映\自定义放映\新建”分别将幻灯片2、幻灯片3添加为“自定义放映1”、“自定义放映2”，如图1所示。
图 1
5.将第一张幻灯片中正确答案的选项按钮（A按钮）超链接到“本文档中的位置\自定义放映\自定义放映1”，并勾选选项框，如图2所示。
图 2
6.同样的操作步骤将第一张幻灯片中其他对应按钮超链接到“自定义放映2”。
7.将第二张幻灯片中的四个选项按钮统一超链接到“自定义放映1”、第三张幻灯片中的四个选项按钮统一超链接到“自定义放映2”。
8.选中第二张和第三张幻灯片点击“隐藏幻灯片”，保存后运行即可。
二、利用VBA语言制作交互式测试题
1.交互式单选题的制作
（1）新建一个空白PPT文档并录入题目。
（2）选择“视图\工具栏\控件工具箱”中的单选按钮。
（3）在当前幻灯片合适的位置拖动画出一个单选按钮并在画出的单选按钮上右击选择“属性”选项，在弹出的属性窗口中修改其Caption内容为“A 多媒体技术”，而后根据页面需要修改其Font的值，如图3所示。
（4）将该单选按钮（Option Button）进行三次复制，再将这三个单选按钮的Caption属性设置成相应的选项内容。
（5）双击其中某个单选按钮弹出代码窗口，插入如下代码：
Private Sub OptionButton1_Click()
MsgBox ("恭喜您，答对了!")
End Sub
Private Sub OptionButton2_Click()
MsgBox ("回答错误，请重新回答")
End Sub
Private Sub OptionButton3_Click()
MsgBox ("回答错误，请重新回答")
End Sub
Private Sub OptionButton4_Click()
MsgBox ("回答错误，请重新回答")
End Sub
（6）习题从库中读取并显示在幻灯片上后，会造成幻灯片上内容的实质性改变，必须在幻灯片放映后将原始界面恢复，故在代码窗口插入如下代码：
Sub Onslideshowpagechange()
OptionButton1.Value = False
OptionButton2.Value = False
OptionButton3.Value = False
OptionButton4.Value = False
End Sub
（7）保存后运行，进行测试。
2.交互式复选题的制作
步骤(1)、（2）、（3）和制作单选题类似，不同的是步骤（2）中需选择控件工具箱中的复选按钮。步骤（4）将该复选按钮（CheckBox）进行三次复制，再将该三个复选按钮的Caption属性设置成相应的选项内容。
步骤（5）在控件工具箱中选择命令按钮，按住鼠标左键在合适的位置拖动，画出一个命令按钮，然后右击，在弹出的“属性”窗口中将其Caption属性设置为“选择”，假设正确答案为A和B，在命令按钮上双击，在弹出的代码窗口中插入如下代码：
Private Sub CommandButton1_Click()
If CheckBox1.Value = True And CheckBox2.Value = True And CheckBox3.Value = False And CheckBox4.Value = False Then
MsgBox "选择正确。", vbOKOnly, "结果"
Else
MsgBox "选择错误！正确答案是“A和B”！", vbOKOnly, "提示"
End If
End Sub
步骤（6）再建立一个命令按钮，将其Caption设置为“重选”，在代码窗口插入如下代码用来清空选项：
Sub onSlideShowTerminate()
CheckBox1.Value = False
CheckBox2.Value = False
CheckBox3.Value = False
CheckBox4.Value = False
End Sub
步骤（7）对于幻灯片使用后的复原方法与单选题相同，保存后运行测试。
需要注意的是：用VBA语言制作交互式测试题，关闭后再次打开可能无法运行，需要再选择“工具\宏\安全性\安全性低”，保存后关闭，然后重新打开。
三、用触发器制作交互式测试题
1.新建一个空白PPT文档，录入题目与选项。
2.在正确的选项后插入艺术字“你真聪明”、在错误的选项后插入艺术字“真遗憾，答错了”。
3.分别选中插入的四组艺术字右击选择“自定义动画”选项，添加自定义动画为“单击时出现”。
4.在自定义动画栏目中点击“你真聪明”选项右侧的下拉菜单，选择计时选项，如图4所示。
图 4
5.在弹出的计时对话框中单击“触发器”，选择“单击下列对象时启动效果”，在下拉菜单中选择“多媒体技术”选项，如图5所示。
图 5
6.对其他三组“真遗憾，答错了”的艺术字采用同样的方法，即在触发器选项中选择相应匹配的选项，最终完成如图6所示，保存后运行。
图 6
（作者单位：陕西师范大学新闻与传播学院）
本文为全文原貌 未安装PDF浏览器用户请先下载安装 原版全文