关于Excel文档的自动评阅系统中若干问题地研究.pdfVIP

关于Excel文档的自动评阅系统中 若干问题的研究① 毛志侠 谢深泉 湘潭大学信息工程学院，湘潭，411105 摘要在远程考试系统中，针对自动阅卷模块里EXCEL文档的表格数据位置具有不确定性，和 EXCEL图表的复杂数据结构，我们利用VBA宏语言来识别文档和图片的格式，提出一种方型搜 索算法对表格数据进行定位。通过对上述问题进行研究，实现对EXCEL操作题答案文档中的表格 数据和图表进行快速定位和准确自动判读。 关键词VBA宏语言，方形搜索算法，自动阅卷，远程考试系统 1 引言 在湘潭大学计算机基础远程考试系统中，要求能实现对各种题型的自动阅卷，其中Excel 文档中表格数据难以定位，加之对Excel图表中数据结构目前尚不清楚，这些都给自动评判 Excel操作题造成了一定的困难。我们在对计算机基础考试系统的研发工作中发现：通过VBA 宏语言来寻找到Excel图表中对象的属性，利用方形搜索算法来对Excel表格中数据进行定 位，完全可以解决上述问题。本文中将给出如何运用ActiveX技术和面向对象程序设计方法来 实现EXCEL文档中表格数据的定位和图表的评判问题。 2 EXCEL文档格式的识别 因为对EXCEL文档的内部结构和细节并不清楚，所以不能直接将ECXEL文档以文件流 的格式在客户端和远程数据库之间传送。但可以将试题和答案文档转换成网络二进制文件流 的形式，传送到远程数据库的OLED对象中，在考生答题和教师阅卷时又以网络二进制流的 Basicfor 形式传送到客户端。利用MicrosoftOffice中集成的VBA(VisualApplications)标准宏 语言，对EXCEL文档进行访问，从而达到对EXCEL文档的格式进行识别和属性的访问。整个 过程如图1所示。 在图1的自动阅卷的模块中，通过VBA所提供的对EXCEL文档操作的各种接口，提取 出EXCEL文档中各个对象的属性。通过对考生答案文档中各对象的属性和标准答案文档中 各对象属性值的比较，实现对两个不同的EXCEL文档中结构和格式进行评判。从而得到对 ①项目资助t湘潭大学第四批教改项目 79 图I关于礤【C旺从出题、答题、阅卷的网络数据流图 EXCEL阅卷的正确评分。下面通过例1来熟悉整个流程：首先，利用ActiveX控件对象对远程 数据库中EXCEL文件进行读取，而后通过VBA宏语言从读取出的文件中得到其结构和格 式，并存储在二维数组中等待评判。 MicrosoftEXCEL9．0ObjectLibrary，在程序编制的过程中就可引用EXCEL对象及属性，并 向对象使用相应的方法乜]。同时，为加速对象的引用和优化应用程序，对象引用最好采用事前 绑定‘引。 Dim Test--ConAs ADODB．Connection‘声明远程数据库连接 DimTest—RecordAs ADODB．Recordset‘声明远程数据记录集 Dim As EXCELAppExcel．Application’声明变量为EXCEL应用对象 DimEXCELWorkbookAsExcel．Workbook DimEXCELSheetAsExcel．worksheet Set EXCELApp=NewExcel．Application’对变量进行初始化 Set EXCELSheet=EXCELApp．Sheets．Add Dim Arry--Excel(10，10)’定义存储EXCEL数据的二唯效组 (2)用对象的方法、属性与事件编写代码，识别和控制EXCEL文档的内容、格式。 Set Set ForEachEXCELSheetIn EXCELWorkbook．Sheets’查看EXCEL文档中每个工作表 IfEXCELSheet．Nam