用ppt作试卷答案不显示怎么办？

hawanthony 发表于: 2008-8-28 20:07 来源: 扑奔PPT网

我用ppt做了一份试卷，但是学生所选的答案不会显示，结果他们想

(2008-08-28 20:07:11, Size: 43.5 KB, Downloads: 32)

~~[attach]104777[/attach]~~检查题目时又不知道开始是选那道题。
附1-2题的vba代码。
Private Sub OptionButton1_Click()
aw(1) = "A"
sm(1) = 0
End Sub
Private Sub OptionButton2_Click()
aw(1) = "B"
sm(1) = 0
End Sub
Private Sub OptionButton3_Click()
aw(1) = "C"
sm(1) = 0
End Sub
Private Sub OptionButton4_Click()
aw(1) = "D"
sm(1) = 2
End Sub
Private Sub OptionButton5_Click()
aw(2) = "A"
sm(2) = 2
End Sub
Private Sub OptionButton6_Click()
aw(2) = "B"
sm(2) = 0
End Sub
Private Sub OptionButton7_Click()
aw(2) = "C"
sm(2) = 0
End Sub
Private Sub OptionButton8_Click()
aw(2) = "D"
sm(2) = 0
End Sub

大家对用ppt作试卷答案不显示怎么办？的评论

amwyq 发表于 2008-8-29 08:27:19: 当然是代码错误了，你的选项按钮的单击事件对应的响应控件是什么呢？？
AM(2)是什么啊？？？
amwyq 发表于 2008-8-29 08:30:11: 细看了下，代码错误不少，比如选项按钮的groupname属性也不能是slide1........
等有空帮你改一下吧！
hunanxm520 发表于 2008-8-29 11:36:56: 代码编辑错误是无法正常运行的
要做这样的工作，的有一定的本事才行啊
呵呵
hawanthony 发表于 2008-8-31 19:19:24: 谢谢大侠！本人是60后的，只是出于对教师这份工作的执着，才于不惑之年开始学习ppt，所以本人对vb之类一点不懂。后来用ppt做课件做多了，才想起用VBA做试卷更有利于学生复习，于是就在网上下载了相关的资料。上面做的试卷就是根据别人的资料做的。新学期又开始了，恳请大侠抽空尽快帮我修改一下。（这里的slide 1...就是幻灯片1...。我在每个幻灯片上做了2道题，10个题目总用了5个幻灯片。虽然学生填写的答案不会出来，但程序会记录的，而且允许多次修改，它会自动记录最后一次修改。）
hawanthony 发表于 2008-8-31 19:31:38: 这段代码是copy他人的（我自己不懂）。按照我的编题思路，aw(1,2--10)是题目的选项，也就是说，aw(1)有A. B, C. D. 四个选项，aw(2)也有A. B. C. D.四个选项，后面依此类推。
amwyq 发表于 2008-8-31 20:36:49: 不是你想象的那样。。。
你应该在答案显示区放一标签或文本框控件，让选项按钮控制它的captino(text)属性。。。
选项按钮的groupname应该保证每个题同名（组）。。。。
。。。。

[ 本帖最后由 amwyq 于 2008-8-31 20:41 编辑 ]