摘 要：在Excel平台上利用VBA设计计算机理论知识选择题的无纸化考试系统，该系统可以在学生登录后自动抽题成卷，并要在系统规定的时间内完成考试，并可自动判分，减轻教师的工作量。
关键词：Excel；VBA；考试系统；无纸化
当今信息化的社会，计算机应用能力已成为现代人必备一种能力，所以现在的各级学校都开设了计算机基础的公共课程。为了加强学生对计算机基础知识掌握，在日常的教学过程中对学生的测试是必不可少的。但传统的纸质试卷测试，教师的工作量较大，为了减轻教师的工作量，便用Excel VBA设计了一个无纸化的计算机理论知识自动抽题成卷、自动阅卷的考试系统。
1．系统实现的关键技术
Excel是Microsoft Office 家族成员，它应用非常广泛，且具有方便的表格式数据综合管理和强大计算统计分析和图表功能。此外，Excel的强大功能还在于它提供的宏语言Visual Basic for Application（简称VBA）是一种完全面向对象体系结构的编程语言，由于其在开发方面的易用性和具有强大的功能，它为广大用户提供了一个新的、更高层次的二次开发平台。
2．系统的实现
2.1 系统功能模块
该系统的主要三个功能模块
（1）登录模块：学生和教师通过不同登录路径。学生进入考试界面，教师不光可以进入考试界面还可以查看评分情况，并可以修改题库内容和学生的信息。
（2）自动抽题：该模块从题库中随机抽取规定数量的题传送到“测试题”表中，并将所抽取题目的标准答案传送到评分表。
（3）自动评分：学生所选择的答案传送到“评分表”中和标准答案对比，自动判断对错并给出分数。
2.2 系统功能的实现
新建一个Excel工作薄，本系统共有四个工作表，四个工作表分别命名为“测试题”、“评分表”、“题库”、“学生信息表”。
2.2.1自动抽题模块的设计
“题库”表的作用是将所需的题目输入其中，“题库”表A列填充题目序号1、2、3、4……，B列每一个单元格对应序号输入题目（包括选项，设定一定的列宽），C列是对应题目的标准答案。
在Excel中打开Visual Basic编辑器，在VBE环境中插入两个用户窗体，一个命名为“选择题量”，并加入两个单选按钮和两个命令按钮，如图1所示。
图1
另一个窗体命名为“进度条”，如图2所示。
图2
“选择题量”窗体的设计可以选择50题目和100题两种不同的题量，在选择题量后按“确定”按钮将自动抽题，其相关语句如下：
（1）不同题量的选择设计
选择不同单选按钮后将选择不同题量和不同的考试时间。
If OpBton1.Value = True Then f = 0 '当50题被选中时
If OpBton2.Value = True Then f = 1 '当100题被选中时
Select Case f
Case 0
e = 50：t = 20 '被赋予50题和20分钟
Case 1
e = 100：t = 45 '被赋予100题和45分钟
End Select
（2）填充序号和引用答案设计
根据题量对于“测试题”表和“评分表”的A列都填充与题量相等的序号，同时“评分表”的B列引用“测试题”表中答案列（C列），以便学生答案传送到“评分表”的B列，抽题时所抽题目的标准答案将传送到“评分表”的C列，其相关语句如下：
Worksheets(""评分表"").Columns(""s:t"").ClearContents
For d = 1 To e
Worksheets(""测试题"").Cells(d + 2, 1) = d '给“测试题”表填充序号
Worksheets(""评分表"").Cells(d, 1) = d '给“评分表”表填充序号
Worksheets(""评分表"").Cells(d, 2).FormulaR1C1 = ""=测试题!R.Value
<= 1 / 90000 Then 陈志坚 VBA技术在计算机基础考试系统设计中的应用.电脑知识与技术. 2009（6）
