用VBA实现Office操作题的自动阅卷.pdfVIP

lSSN1 009-3044 and CompuferKnowledgeTechnology电脑知识与技术 Tel：+86—551—56909635690964 V01．5，No．36，December2009，PP．10267-10268 用VBA实现Office操作题的自动阅卷 杜定强 (河南省安阳市第一中学分校图书馆，河南安阳455000) 摘要：VisualBasicfor 动阅卷。因VBA编程中涉及的知识点较多，不可能一一加以列举，笔者意在通过本文向读者阐述程序编制的一般方法和使用VBA 实现ofhce操作题自动阅卷的核心思想。 燕键词：VBA：0伍ce操作题；阅卷 中国分类号：TP391．4文献标识码：A 文章编号：1009—3044(2009)36—10267—02 在目前的办公自动化软件中，Microsoft 如果它们的操作题单纯依靠人工阅卷，效率会非常低，而且容易出现误判、漏判、给分不公正等问题。目前，信息技术会考软件已经 。文现了Omce操作题的自动阅卷功能，但任课教师如果想要在平时的教学中使用这些软件，就必须花钱购买。为了解决这个问题，我 认真研究了很多资料，使用Office软件自带的VBA宏指令编程，实现了操作题的自动阅卷功能。 {VBA的基本概念与实现原理 for VBA是指VisualBasic 写VBA程序．以实现某个功能。 目，要求学生对文档或表格进行编排．阅卷人则检查学生是否已按照题目要求完成了相关操作，并且是否达到题目要求的效果。由 于Office各应用系统(包括Word、Excel、Power 的方式，而是采用对象数据流的方式进行存储，包括主数据流、摘要信息、表数据流、非文本数据流等，结构非常复杂，因此，从外部 元素，并对它们的状态进行识别判断，因此非常适合于用来编写自动阅卷的相关程序。 2VBA针对Word的主要对象 的VBA对象。 其他的对象集合，例如：Document、windows、Selection等对象。 同一个文档中，建议大家使用ThisDocument对象，它代表当前文档，这样能够省去打开文档、保存文档、关闭文档等复杂操作。 使用VBA通常需要完成的任务是在文档中指定一个区域，然后对该区域进行一些操作，例如插入文字、应用格式等。文档的这 一部分就可以用Range对象来代表。定义Range对象后，就可以应用Range对象的方法和属性来修改这个区域的内容。 对文档应用格式主要包括字体格式、段落格式、表格等内容。 通过使用Font对象可以设置文本的字体格式。Font对象包含了各种字体属性(字体名称、字体大小、颜色等)。 围或文档内的一个段落。可用Paragraphs(index)返回一个Paragraph对象，其中index为索引号。 3VBA评测Word操作题实例 通过上面的内容，我们已经了解Word中常用的VBA对象，关于它们的属性和方法大家可以看帮助。下面，我们通过两个实例 学习VBA评测Word操作题的编程方法。 例1字体格式的评测。 题目要求：将第一自然段(明十三陵从1409年营建长陵到清顺治元年营建思陵……)的格式设置为：隶书、小四号、青色、加粗、 倾斜。 收稿日期：2009—10～27 本栏目责任编辑：谢媛媛 ”。””*m”*m软件设计开发m”10267 万方数据万方数据 and ComputerKnowledgeTechnology电脑知识与技术 代码如下： With ThisDoeument．Paragraphs(1)．Range．Font． ：考点1、对字体名称进行评测 If．Name=”隶书”Then TextBoxl．Text=”考点l、字体名称设置成功”＆vbCrlA Else TextBoxl．Text=”考点1、字体名称设置失败”＆vbCrIA EndIf 7考点2、对字号大小进行评测 If．Size=12Then TextBoxl．Text=TextBoxl．Text”考点2、字体大小设置成功”＆vbCrLf Else TextBoxl．Text=TextBoxI．Text”考点2、字体大小设置失败”＆vbCrU