基于VBA的自动改卷系统的设计与实现.docVIP

基于VBA的自动改卷系统的设计与实现 　　摘要：为了适应高校计算机教学的需要，实现计算机基础课程考试无纸化、评分自动化的目标，根据学科特点，结合自身的教学经验，利用VBA组件技术设计与实现了计算机应用基础课的自动改卷系统，实际应用结果表明，该系统实现了自动改卷的目的，提高了教师的工作效率。 　　关键词：组件；VBA；自动改卷系统 　　中图分类号：TP311文献标识码：A文章编号：1009-3044(2011)19-4594-02 　　Designing And Implementation of Test Paper Automatic Correction System Based on VBA 　　LIAO Li-rong 　　(School of Computer Science, Shaoguan University, Shaoguan 512005, China) 　　Abstract: To meet the needs of computer teaching, realize the goal of paperless test and score automation of basic computercourse,the automatic correction system based on VBA was designed and implementedby using the VBA com technique, the result shows that the system can achieve the goal of automatic correction and can improve the efficiency of teachers. 　　Key words: component; VBA; automatic correction system 　　在高校计算机教学中，非计算机专业的计算机基础课程教学任务重，实验批改量多，教师需要花费大量的时间和精力来完成实验或试卷的批改，为了减轻教师重复的工作压力，针对计算机基础课程的特点，研究开发基于VBA的自动改卷系统。 　　1 VBA简介 　　Visual Basic for Applications（VBA）是一种Visual Basic的一种宏语言，主要能用来扩展Windows的应用程式功能，是最常用的构建Office解决方案的一种技术。采用VBA作为基本开发工具，可以将其用宏录制的代码移植到VB中，从而加快开发进程。 　　2 总体设计方案 　　计算机基础课程主要包括Word、Excel等内容，由很多知识点组成，每个知识点的对应属性不同，但是处理方法大体相同，即：先打开OFFICE文档，读取需批改内容，与标准答案比对，得出分值，具体如下： 　　1) 对计算机基础课程试卷的特点进行分析，改卷系统分为：Word操作题、Excel操作题等模块，每个模块包含试卷中所有的知识点的批改程序。 　　2) 分析试卷中每个模块需要考察的具体知识点，并利用Office的宏录制功能取得该知识点对应的VBA属性。 　　3) 将学生提交的试卷文档与正确答案文档中相应的知识点属性进行比较，得出分值。 　　4) 将最后分值写入数据库。 　　具体工作流程图如图1。 　　3 具体方案实现 　　3.1 打开指定的Office文档 　　在Word文档使用之前，必须先打开该文档，Word、Excel对象模型是按层次顺序排列的，顶层对象是Application对象，表示Word、Excel应用程序本身，Application提供整个应用程序的包装，即打开Word、Excel应用程序。所以首先，使用CreateObject方法创建创建一个Word 的Application对象： 　　Set WrdApp = CreateObject(“Word.application”) 　　然后通过WrdApp对象的.Documents.Open 方法，打开一个文档对象： 　　WrdDocFile = WrdApp.Documents.Open(sFlnm) 　　sFlnm为题目表中的文件名，创建Document的对象名为WrdDocFile； 　　同样，在Excel文档使用之前，首先，使用CreateObject 方法，即 　　Set oexcel = CreateObject(“Excel.Application”) 　　创建一个application对象oexcel。 再使用 　　SetcrtBook = oexcel.Workbooks.Open(Filename) 　　打开题目表中取出的文件名所对应的工作簿。 　　3.2