Word操作题自动阅卷方案

Word操作题自动阅卷方案

摘要：提出了利用vba技术，使用visual basic进行程序设计，从word文档中提取测试内容相关的属性与测试要求相比较，判断操作是否正确并增减分数，从而实现word操作题的自动阅卷方案，并给出了部分算法。

关键词：vba；自动阅卷；office；属性；评分 0引言

随着当今社会办公自动化程度的不断提高，计算机应用技能在教学与工作活动中成为不可或缺的技能之一。在高等农业院校教学活动中《大学计算机基础》已经成为公共课程之一，占有重要的地位。其中word字处理软件，是主要教学重点，word字处理软件的操作也是计算机技能考核的主要内容。

由于word软件本身功能强大、内容丰富，加上软件操作类知识点并不适合使用传统的试卷形式进行考试，所以，多数考核部门选择让考生使用计算机完成操作类考试。那么如何准确、快速、高效地衡量被测试人员对word的掌握程度，是教学人员亟待解决的问题。

本文主要论述了一种利用vba技术，对考生提交的word文件进行快速准确的进行阅卷的可行性方案。 1自动阅卷系统的思路分析

在考试过程中，操作题主要检查考生的实际应用能力。通常是给出一篇word文档并提出若干要求，考生按照要求利用word软件进

行排版并保存为word文档，之后提交所做的文件。阅卷人负责检查考生提交的文件并判断是否符合要求。

由于word文件的结构并没有使用头加内容的存储方式，而是采用了对象数据流的方式进行存储，文件内部包含了主数据流、表数据流、非文本数据流、摘要等信息，文件结构非常复杂。很难通过外部获取的方式获得可靠的数据结构。

实际上，office是基于部件模型技术(com技术)的软件，这使其具有了com自动化的功能。事实上，office中集成了标准宏语言(vba)提供了访问office文件的接口。以word2003文件为例，其包含的表格、图片、页面、格式等等无一例外的都属于vba对象，这就为在vba程序中使用这些对象的属性和方法，实现自动化操作奠定了基础。

编写自动阅卷系统的思路就是：通过vba编程调用word2003文档中与题目相关的对象，提取其属性值。并将提取的结果与实际的要求做比对，从而精确的判断出考生的操作是否正确，并给出相应的成绩。

2自动阅卷系统的实现方法

自动阅卷系统的开发可以选用vb6.0（visual basic 6.0）作为开发工具，vb6.0对于office中的标准宏语言（vba）有着良好的支持，具有面向对象、界面设计简单、开发速度快、易于调试等优点。具体方法如下：

（1）在vb6.0工程中引入“microsoft word 11.0 object library”

对象库，主要目的为在编程过程中查看该库的对象及其所有的属性和方法，实现快速引用对象和程序优化。在office2000中该库为9.0版本，在office97中版本为8.0。

（2）定义文档对象和应用程序对象，并打开相关文档。 dim applicationword as word.application dim documantword as word.document

set applicationword = new word.application

set documantword = applicationword.document.open(“路径\\文件名”)

（3）获取word文档中的相关属性。

属性的获取是整个自动阅卷系统中最总要的信息，能否正确阅卷取决于能否取得相关的属性值。在word2003中常用的对象包括有：页面格式——pagesetup、段落格式——paragraphs、查找与替换——find、表格格式——tables、图片与绘图——shapes、文本格式——range等等。编程过程中可以通过这些对象获取其需要的属性，来做判断。例如：①获取页面上边距：tmargin = pagesetup.topmargin；②获取第一段文字的颜色：ctext = paragraphs(1).font.color；③获取表格的行数：

rcount=documantword.tables(1).rows.count。将属性取出后，与正确的值做比较判断据此可以得出考生操作的结果是否正确，从而进行成绩的增减，并最终给出分数。设置纸张左边距为2cm的评分（1cm约等于28.35磅）示例程序如下：