VBA在Office自测系统开发中的应用.pdfVIP

维普资讯 第9卷第3期 辽宁师专学报 Vo1．9 No．3 2007年 9月 JournalofLiaoningTeachersCollege Sep．2007 【学术研究】 VBA在 Office自测系统开发 中的应用 郭 琳 (沈阳职业技术学院计算机学院，辽宁 沈阳 110021) 摘 要 ：筒述两种构建 Office解决方案 的技术，并在此基础上，分别用 Word 自测模块和 Excel自测模块 的部分开发实例 ，说 明使用 VBA进行高效开发的方法 ． 关键词 ：Office自测系统；MicrosoftWord对象；MicrosoftExcel对象；VBA；宏 中图分类号 ：TP311．52 文献标识码 ：A 文章编号 ：1008—5688(2007)03—0033—02 为了适应高职院校教学改革的需要，逐步实现基础课程考试选题随机化 、考点全面化、评分 自动化的 目标，教师根据学科特点，结合 自身的教学经验 ，开发用于学生的 自测系统是十分必要的， 1 Office开发工具集 VBA和 VisualStudioToolsforOffice是最常用的两种构建 Office解决方案 的技术，对于多种解决方 案，通常可以选择任意一种技术 ，也可以同时使用两种技术 (不过这种方法有可能限制在随着时间的推移 要从 VBA进行迁移的过渡项 目)．其 中，VisualStudioToolsforOffice理所当然地 占据 了高端 ，并向下扩 展到低端，但它不提供宏录制功能，这也是VBA仍然充当基于用户交互的非专业解决方案的唯一工具的 原因之一．因此在本例中，仍然采用VBA作为基本开发工具，然后将其代码移植到VB中，从而加快开 发进程 ． 以上简要介绍Word和Excel中的对象以及Office开发工具，下面我们来研究如何将Word中自动录制 的宏代码转换为自动评分代码． 2 Word自测模块开发实例 第一步 ：录制制作标准答案文档过程的宏代码． VBA例 1： 注：下面只列出考试题 目要求的部分代码 SubMacrol() 标题对齐方式为居 中 Selection．TypeTextText：：斑马世界 W ithSelection．ParagraphFormat 插入标题 斑马世界 ． CharacterUnitFirstLinelndent=3 Selection．Font．Name= 隶书 正文首行缩进 3个字符 标题字体为隶书 Selection．Font．Size=22 EndW ith 标题字号为二号 Selection．ParagraphFormat．Alignment= EndSub wdAlignParagraphCenter 第二步：在第一步的基础上 ，编制新宏 ．在新宏中，针对考试原始文档 中的位置 ，按考试题 目要求创 建新宏．运行此宏，可将原始文档转化为标准答案文档． VBA例 2： Subtestl() W ithmyRange1 标题字体设为隶书，字号二号，居 中 ． Font．Name= 隶书 SetmyRangel=ActionDocument．Range(Start：=0，End： ． Font．Size=22 4)