在visualbasic60中创建w

《在visualbasic60中创建w》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、在VisualBasic60中创建Word和大家分享这篇日志，我的看法是：原文地址：在VisualBasic&n原文作者：御风天下在VisualBasic6.0中创建Word/Execl文档摘要：分析了Word对象模型的结构，特别是Document对象及其使用方法，提出了在VisualBasic中创建Word格式文档的方法，并给出了该方法的应用实例。关键词：VisualBasic，Word对象模型，文档引言Word文档是实际工作学习中最为常用的文档格式之一。随着社会信息化程度的提高，一些传统的由人工完成工作逐渐转向由计算机来处理。计算机自动组卷系统便是一个典型的例子。为了追求

2、更高的效率，一些计算机自动组卷系统的单位用户要求由软件输出Word格式的试卷不需排版直接供印刷使用。由于MicrosoftOffice套件的普及，Word文档、电子表格文档、电子幻灯片等文档日渐常用。虽然在Office中各个程序的文档可以方便地转换，但是这种转换是以失去文档原本的格式为代价的。例如，在自动组卷系统中，存储在Access数据库中的试卷可以通过Access提供的导出功能产生Word文档，但产生的文档是无格式的，需花费大量时间重新排版方可符合用户在试卷格式上的要求。针对这一问题，本文讨论通过研究Word对象模型，提出使用该对象模型创建符合用户所要求的特定格式的Wor

3、d文档的方法。Word对象模型1、Word对象模型层次结构对象是VisualBasic的基石，几乎在VisualBasic中的每个操作都与修改对象有关。Word的任何元素(如文档、表格、段落、域、书签等)都可以用VisualBasic中的对象来代表。对象代表一个Word的元素，如文档、段落、书签或单个的字符。集合也是一个对象，该对象包含其他数个对象，通常这些对象属于相同的类型，例如，一个集合对象中可包含文档中的所有书签对象。通过使用属性和方法，可以修改单个的对象，也可修改整个的对象集合。MicrosoftWordVisualBasic提供一套完整的Word对象模型，这是一个以

4、Application为顶层对象的对象层次结构。其结构如图-1所示。对象由两种类型的成员构成，一种是属性，第二种成员是方法。属性是对象的一个特性或者该对象行为的一个方面。例如，文档属性包含名称、内容、保存状态以及是否启用修订。要更改一个对象的特征，可以修改其属性值。要设置一个属性的值，需在对象的后面紧接一个句点、属性名称、一个等号及新的属性值。下面的示例在"MyDoc.doc"文档中启用修订。Documents("MyDoc.doc").TrackRevisions=True方法是对象可以进行的动作。例如，只要文档可以打印，Document对象就具有PrintOut方法。方法

5、通常都带有参数，限定动作将如何进行。下面的示例打印活动文档的前三页。ActiveDocument.PrintOutFrom：=1,To：=3在大多数情况下，方法是动作，而属性是性质。使用方法将导致针对对象的某些事情发生，而使用属性则会返回对象的信息，或者引起对象的某个性质的改变。2、Document对象和Documents集合对象在VisualBasic中，可使用Document对象或Documents集合对象的方法来修改文件。Document对象是本文用来创建Word文档的主要对象。Word对象模型中Documents(Document)对象集(或Document)对象的结

6、构如图-2所示。其中的Paragraphs集合对象与PageSetup对象将是下文的主角。Paragraphs集合对象是由选定内容、范围或文档中的Paragraph对象组成的集合。PageSetup对象代表页面设置描述。PageSetup对象包含了文档的所有页面设置属性(左边距、下边距、纸张大小，等等)。在熟悉了Word对象模型的基础上，我们可以使用Document对象对Word文档进行各种操作，例如：2.1新建一篇文档Documents集合包含所有打开的文档。要新建一篇文档，可使用Add方法将一个Document对象添至Documents集合。新建文档的方法之一是使用Add

7、方法。Add方法将返回Document对象，该对象引用新文档。在下面的示例中，把Add方法返回的Document对象赋予一个对象变量newDoc。然后设置该Document对象的几种属性和方法。通过newDoc对象变量，可以很容易地控制新文档。SetnewDoc=Documents.AddWithnewDoc.Content.Font.Name="Arial".SaveAsFileName：="Sample.doc"EndWith2.2打开文档要打开一篇现有的文档，可使用Documents集合的Open