admin 管理员组文章数量: 1086019
2024年3月28日发(作者：springboot官网入口)
老师们经常用PPT来制作教学课件，现在很多学校都期末考试
了，当然也有职业中学正准备进行期末考试。想如何对学生进行测试
和考试吧，我们用PowerPoint2003制作了电子考试系统。其中主要
使用了VBA功能，下面我们就来看看如何在PowerPoint中制作电子
考卷。
打开PPT新建空白文档，我们先保存文档，点击“视图——工具
栏——Visual BASIC”打开Visual BASIC工具栏，点击“控件工具
箱”调出控件工具箱，在“控件工具箱”中点击“命令按钮”，用鼠
标在空白幻灯片上拖出一个大小合适的按钮，即“CommandButtonl”，
在按钮上点击鼠标右键并选择“属性”，在“CommandButtonl”的属
性框中把它的Caption（标题）改为“输入学生姓名”，并在按钮的
下方插入文本框（点击“插入——文本框——水平”即可实现）并输
入第一题的题目，再点选控件工具箱的“选项按钮”制作一选择按钮，
并右键打开其属性，将Capption里的：“OptionButtonl”改为“A”,
再将这个按钮复制三个，分别将Capption的值改为B、C、D，最后
加入一动作按钮（点击“幻灯片放映——动作按钮——前进或下一项”
即可插入），当做完本题后能进入到下一题（效果见图1）。
试卷头的制作
要记录学生所做的试题答案和统计得分，要定义公用的数组和变量，双击“输入
开Microsoft Visual Basic(VBA)窗口，点击“插入——模块”，并在“演示文稿1—
窗口中输入：
Public xm As String
Public da(50) As String
Public df(50) As Integer
其中xm变量用于记录考生姓名，数组da(50)用于记录考生各题所选择的答案，
录各个答案的得分。这里设置的数组上届是50，如果题目更多，可加大。对于xm,我们
函数来记录考生姓名，再把赋值给xm，即xm=InputBox(“输入考试姓名”)。
试题的制作
为每个题目的各个答案输入记录答案和得分代码，双击答案A选项输入代码即可
具体操作请见//76976/action_viewspace
的制作
为每题目的各个答案输入记录答案和得分代码，双击答案A选项输入如下代码。
Private Sub CommandButton1_Click()
xm = InputBox("输入考生姓名")
End Sub
─────────────────
Private Sub OptionButton1_Click()
da(1) = "A"
df(1) = "0"
End Sub
版权声明：本文标题：如何用PPT打造电子考试系统 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/b/1711560284a599997.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论