精通在VFP中调用WORD的方法.doc_第1页
精通在VFP中调用WORD的方法.doc_第2页
精通在VFP中调用WORD的方法.doc_第3页
精通在VFP中调用WORD的方法.doc_第4页
精通在VFP中调用WORD的方法.doc_第5页
已阅读5页,还剩30页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

在VFP中调用WORD的基本方法目 录一、建立WORD应用程序对象,新建、打开、保存WORD文档51、建立对象52、显示WORD窗口53、新建一个WORD文档5(1)Count属性5(2)Name属性54、打开一个已存在的WORD文档55、激活文档,使文档成为当前激动文档66、保存文档67、页面设置6(1)Orientation属性6(2)TopMargin属性6(3)BottomMargin属性6(4)LeftMargin属性6(5)RightMargin属性7(6)PageWidth属性7(7)PageHeight属性78、打印文档79、关闭文档710、退出WORD8二、Font对象81、Name 属性82、Size属性83、Bold属性84、Italic属性85、Color属性86、Underline属性87、UnderlineColor属性88、Subscript属性99、Superscript属性910、Spacing属性911、Scaling属性9三、Paragraph和Paragraphs集合对象91、添加段落9(1) Add方法10(2)InsertParagraph方法10(3)InsertParagraphAfter 方法10(4)InsertParagraphBefore 方法11(5)TypeParagraph 方法112、设置段落格式11(1)FirstLineIndent属性11(2)LeftIndent属性11(3)RightIndent属性11(4)Alignment属性11(5)LineSpacing属性12(6)HangingPunctuation属性12四、Range 和 Selection 对象12(1)Range对象12(2)Selection 对象13(3)常用属性13Start属性13End属性14Text属性14Type属性14Information 属性15(4)常用方法18Copy 方法18Cut 方法18Paste 方法18Collapse 方法18InsertBefore 方法19InsertAfter方法19TypeText方法19Delete 方法20移动插入点的方法20Move 方法20MoveDown 方法20MoveEnd 方法21MoveEndUntil 方法21MoveLeft 方法22MoveRight方法22MoveStart 方法23MoveStartUntil 方法23MoveUp 方法24五、表格处理251、Table 对象和Tables 集合对象252、添加表格25(1)PreferredWidthType 属性25(2)AllowAutoFit属性26(3)AllowPageBreaks属性263、Border 对象和Borders 集合对象26(1)LineStyle属性26(2)LineWidth属性27(3)Color属性27(4)Enable 属性27(5)DefaultBorderLineWidth 属性27(6)DefaultBorderLineStyle 属性27(7)DefaultBorderColor 属性274、Cell 对象和Cells 集合对象285、Row 对象和Rows 集合对象28(1)Height 属性28(2)Delete 方法28(3)SetHeight 方法286、Column 对象和Columns 集合对象29(1)Width 属性29(2)Delete 方法29(3)SetWidth 方法297、合并与拆分单元格30(1)合并单元格30(2)拆分单元格30六、Shape 对象和Shapes 集合对象321、常用方法32(1)AddLine 方法32(2)AddTextbox 方法33(3)AddTextEffect 方法33(4)AddPicture 方法34因WORD具有很强的文字排版和表格处理能力,在开发VFP应用程序过程中如果能巧妙地使用WORD,将极大地增强VFP的输出功能,设计出更加美观的文档和表格版面。下面本人结合实际开发经验介绍一下在VFP中调用和控制WORD的基本方法,所举实例都在Visual FoxPro 6.0(简体中文版)中调试通过。一、建立WORD应用程序对象,新建、打开、保存WORD文档1、建立对象在VFP中调用WORD首先必须先建立一个WORD应用程序对象:MyWord=CreateObject(Word.Application) MyWord是一个自定义的对象变量,代表WORD应用程序。2、显示WORD窗口MyWord.Visible=.T.如果将MyWord.Visible的值设为.F.,则关闭WORD窗口,但WORD程序仍在后台运行,仍可以对其进行控制。3、新建一个WORD文档MyWord.Documents.AddDocuments是由Word 当前打开的所有Document对象所组成的集合。Document代表一个WORD文档对象。Documents集合对象的两个常用属性:(1)Count属性统计Documents集合对象中Document对象数量,即当前打开文档的数量。(2)Name属性Document对象的文件名称。下例显示Documents集合对象中文档总数和每个文档的名称。? MyWord.Documents.CountFor Each MyDoc IN MyWord.Documents ? MyDoc.NameNext MyDoc4、打开一个已存在的WORD文档MyWord.Documents.Open (e:abcef.doc)文件名称要包含完整的路径。5、激活文档,使文档成为当前激动文档MyWord.Documents(index).Activateindex是文档的名称或索引序号。新建的文档或刚打开的文档默认为当前活动文档。可用ActiveDocument 属性返回一个 Document 对象,该对象代表活动文档。6、保存文档MyWord.Documents(index).Saveindex是文档的名称或索引序号。如:(1)MyWord.Documents(1).Save保存文档集合中第一个文档。(2)MyWord.Documents(abcef.doc).Save保存文档集合中名为abcef.doc的文档。(3)MyWord. ActiveDocument.Save保存当前活动的文档。(4)MyWord.Documents.Save保存所有文档。7、页面设置PageSetup对象代表页面设置说明,它包含了文档的所有页面设置属性(左边距、下边距、纸张大小等)。常用的有以下几个属性:(1)Orientation属性返回或设置页面方向,数值型:0纵向 1横向。(2)TopMargin属性返回或设置页面上部边缘与正文文本上部边界之间的距离(以磅为单位)。数值型。(3)BottomMargin属性返回或设置页面底边与正文文本边界之间的距离(以磅为单位)。数值型。(4)LeftMargin属性返回或设置页面左边缘与正文左边界之间的距离(以磅为单位)。数值型。(5)RightMargin属性返回或设置正文右边界与页面右边距之间的距离(以磅为单位)。数值型。(6)PageWidth属性返回或设置页面宽度(以磅为单位)。数值型。(7)PageHeight属性返回或设置页面高度(以磅为单位)。数值型。注:1英寸2.54厘米 1英寸72磅下例进行页面设置,页面横向、顶部边距2.54厘米、底部边距2.54厘米、左边距3.17厘米、右边距3.17厘米、页面宽度与高度分别为21和29.7厘米(即A4纸)。With MyWord.ActiveDocument.PageSetup .Orientation = 1 .TopMargin =2.54/2.54*72 .BottomMargin =2.54/2.54*72 .LeftMargin =3.17/2.54*72 .RightMargin =3.17/2.54*72 .PageWidth =21/2.54*72 .PageHeight =29.7/2.54*72 EndWith8、打印文档MyWord.ActiveDocument.PrintOut9、关闭文档(1)MyWord.Documents.Close(WdSaveOptions)关闭所有文档。WdSaveOptions是可选参数:其值为0时,表示关闭文档时,不保存自上次保存以来所做的修改;其值为-1时,表示关闭文档时,保存自上次保存以来所做的修改。如果省略该参数(下同),可写为:MyWord.Documents.Close,关闭文档时,将保存自上次保存以来所做的修改。(2)MyWord. ActiveDocument. Close(WdSaveOptions)关闭当前活动的文档。(3)MyWord.Documents(1). Close(WdSaveOptions)关闭文档集合中第一个文档。(4)MyWord.Documents(abcef.doc). Close(WdSaveOptions)关闭文档集合中名为abcef.doc的文档。10、退出WORDMyWord.Quit二、Font对象该对象包含了各种字体属性(字体名称、字体大小、颜色等)。常用的属性有以下几种:1、Name 属性返回或设置字体名称,字符型。如:宋体、黑体、仿宋_GB2312、华文仿宋等。2、Size属性返回或设置字体大小(以磅值表示),数值型。一号字是26磅,二号字是22磅,三号字是16磅,四号字是14磅,五号字是10磅。3、Bold属性如果该属性值为.T.,则将字体或范围的格式设置为加粗格式。逻辑型。4、Italic属性如果为.T.,则设置字体或区域的格式为倾斜。逻辑型。5、Color属性该属性返回或设置指定的 Border 或 Font 对象的 24 位颜色。该属性值是RGB 函数返回的值。如:RGB(255,0,0)为红色。6、Underline属性该属性返回或设置应用于字体或区域的下划线的类型。数值型。0-无下划线,1-下划线为单线,3-下划线为双线。7、UnderlineColor属性该属性返回或设置指定 Font 对象的下划线的 24 位颜色。该属性值是RGB 函数返回的值。8、Subscript属性如果该属性值为.T.,则将字体格式设为下标。9、Superscript属性如果该属性值为.T.,则将字体格式设为上标。10、Spacing属性返回或设置字符的间距。以磅为单位,数值型。11、Scaling属性返回或设置用于字体的缩放比例。本属性以当前字体大小的百分比水平拉长或压缩文字(缩放范围从 1 到 600)。数值型。下列示例设置所选区域的字体属性:With MyWord.Selection.Font .Name=仿宋_GB2312EndWith .Size=22 .Bold=.T. .Italic=.T. .Color= RGB(0,0,0) .Underline=3 .UnderlineColor= RGB(255,0,0)EndWith三、Paragraph和Paragraphs集合对象Paragraph代表选定内容、范围或文档内的一个段落。Paragraphs 集合包含了所选内容、范围或文档中的所有段落。Paragraph 对象为 Paragraphs集合的一个成员。可用 Paragraphs(index) 返回一个 Paragraph 对象,其中 index 为索引号。下例将活动文档的第一段右对齐。MyWord.ActiveDocument.Paragraphs(1).Alignment = 21、添加段落可用 Add、InsertParagraph、InsertParagraphAfter 或 InsertParagraphBefore 方法在文档中添加一个空段落。(1) Add方法语法:expression.Add(Range)expression必需。该表达式返回一个 Paragraphs 对象。RangeVariant 类型,可选。要在其前添加新段落的范围,新的段落不替换该范围。如果不指定 Range,则将新段落添加至所选内容或范围之后,或者添加至文档最后,具体情况取决于 expression 的设置。下例在所选内容之后添加一个段落。MyWord.Selection.Paragraphs.Add下例在所选内容中第一段之前添加一个段落标记。Range1=MyWord.Selection.Paragraphs(1).RangeMyWord.Selection.Paragraphs.Add(Range1)下例在活动文档第二段之前添加一个段落标记。Range1=MyWord.ActiveDocument.Paragraphs(2).RangeMyWord.ActiveDocument.Paragraphs.Add(Range1)下例在活动文档的末尾添加一个新的段落标记。MyWord.ActiveDocument.Paragraphs.Add(2)InsertParagraph方法用新段落替换指定区域或选定部分。应用本方法后,该区域或选定内容将更改为新段落。语法:expression.InsertParagraphexpression必需。该表达式返回一个 Range 或 Selection 对象。说明:如果在使用本方法之前先使用 Collapse 方法,可以不覆盖该区域或所选内容。用 InsertParagraphAfter 方法可在 Range 或 Selection 对象后插入一个新段落。下例在活动文档开始处插入一个新段落。MyWord.ActiveDocument.Range(0,0).InsertParagraph(3)InsertParagraphAfter 方法在区域或所选内容之后插入段落标记。在应用本方法之后,该区域或所选内容将扩展至包括新段落。语法:expression.InsertParagraphAfterexpression 必需。该表达式返回一个 Range 或 Selection 对象。下例在当前段落之后插入一个新段落。MyWord.Selection.InsertParagraphAfter(4)InsertParagraphBefore 方法在指定的所选内容或区域前插入一个新段落。在应用本方法之后,该区域或所选内容将扩展至包括新段落。语法:expression.InsertParagraphBeforeexpression 必需。返回 Range 或 Selection 对象的表达式。下例在活动文档开始处插入一个新段落。MyWord.ActiveDocument.Range(0,0).InsertParagraphBefore(5)TypeParagraph 方法插入一个新的空段落。如果所选内容没有折叠为一个插入点,则新段将覆盖所选内容。用 InsertParagraphAfter 或 InsertParagraphBefore 方法可插入一个新段而不删除所选内容。语法:expression.TypeParagraphexpression 必需。该表达式返回一个 Selection 对象。2、设置段落格式设置段落格式的常用属性:(1)FirstLineIndent属性返回或设置首行缩进或悬挂缩进的大小(以磅值表示)。用正数设置首行缩进的尺寸,用负数设置悬挂缩进的尺寸。数值型。(2)LeftIndent属性返回或设置一个值,该值代表指定段落、表格行或 HTML 分段的左缩进(以磅为单位)。数值型。(3)RightIndent属性返回或设置指定段落的右缩进量(以磅为单位)。数值型。(4)Alignment属性返回或设置一个指定段落的对齐方式。其值:0-左对齐 1-居中对齐 2-右对齐 3-两端对齐。(5)LineSpacing属性返回或设置指定段落的行距(以磅为单位)。数值型。(6)HangingPunctuation属性如果该属性值为.T.,则指定段落中的标点将可以溢出边界。使用 Format 属性可返回一个或多个段落的 ParagraphFormat 对象。ParagraphFormat 属性返回所选内容、区域、样式、Find 对象或 Replacement 对象的 ParagraphFormat 对象。下例将活动文档中的首段设置为右对齐。MyWord.ActiveDocument.Paragraphs(1).Alignment =2下例活动文档所有内容的有关范围设置段落格式:行距12磅,首行缩进20磅。With MyWord.ActiveDocument.Content.ParagraphFormat.LineSpacing=12.FirstLineIndent=20EndWith四、Range 和 Selection 对象(1)Range对象该对象代表文档中的一个连续范围。每一个 Range 对象由一起始和一终止字符位置定义。和文档中书签的使用方法类似,使用 Range 对象识别文档的指定部分。但和书签不同,Range 对象只在定义该对象的过程正在运行时才存在。Range 对象和所选内容相互独立。也就是说,可定义和复制一个范围而不需改变所选内容。还可在文档中定义多个范围,但每一个窗格中只能有一个所选内容。可用 Range 方法返回一个 Range 对象,该对象由指定起始和终止字符位置定义。下例返回代表活动文档前 10 个字符的 Range 对象。myRange = MyWord.ActiveDocument.Range(0, 10)可用 Range 属性返回一个 Range 对象,该对象由其他对象的起点和终点定义。Range 对象可用于多种对象(例如,Paragraph、Bookmark 和 Cell)。下例返回对应于活动文档第一段的 Range 对象。aRange = MyWord.ActiveDocument.Paragraphs(1).Range下例返回对应于活动文档第二至第四段的 Range 对象。Range1= MyWord.ActiveDocument.Paragraphs(2).RangeRange2= MyWord.ActiveDocument.Paragraphs(4).RangeaRange = MyWord. ActiveDocument.Range(Range1.Start, Range2.End)(2)Selection 对象该对象代表窗口或窗格中的当前所选内容。所选内容代表文档中被选定(或突出显示的)的区域,若文档中没有所选内容,则代表插入点。每个文档窗格只能有一个活动的 Selection 对象,并且整个应用程序中只能有一个活动的 Selection 对象。用 Selection 属性可返回 Selection 对象。如果没有使用 Selection 属性的对象识别符,Word 将返回活动文档窗口的活动窗格中的所选内容。下列示例从活动文档复制当前所选内容。MyWord. Selection.Copy下列示例剪切 Documents 集合中第三个文档的所选内容。访问文档的当前所选内容时,文档无需处于活动状态。MyWord. Documents(3).ActiveWindow.Selection.Cut用 Word 处理文档时,通常先选定文字,然后对所选内容进行操作,例如设置文字格式或键入文字。Select 方法可激活一个对象。例如,下列指令选定活动文档中的第一个单词。MyWord. ActiveDocument.Words(1).Select(3)常用属性Start属性该属性返回或设置所选内容、区域或书签起始字符的位置。数值型。如果将本属性的值设置为大于 End 属性的值,则将 End 属性的值设为与 Start 属性的值相同。起始字符位置是指距文档该部分开头最近的字符位置。本属性返回起始字符相对于文档该部分开头的位置。文字部分的起始字符位置为 0。通过设置本属性可以更改所选内容、区域或书签的大小。下例返回活动文档第二段的起始字符位置和第四段的结束字符位置。这些字符位置用于创建区域 myRange。Pos1 = MyWord. ActiveDocument.Paragraphs(2).Range.StartPos2 = MyWord.ActiveDocument.Paragraphs(4).Range.EndmyRange = MyWord.ActiveDocument.Range(Pos1, Pos2)下例通过起始和结束字符位置判断所选内容的长度。SelLength = MyWord.Selection.End - MyWord.Selection.Start下例将 myRange 起始字符的位置向右移动一个字符(使该区域缩小一个字符)。myRange = MyWord.Selection.RangemyRange.SetRange (myRange.Start + 1, myRange.End)End属性返回或设置所选内容、区域或书签中结束字符的位置。数值型。如果本属性设置的值小于 Start 属性的值,则 Start 属性将被设成同一值(即 Start 与 End 属性值相等)。下例将 myRange 的结束位置移动一个字符。myRange = MyWord.ActiveDocument.Paragraphs(1).RangemyRange.End = myRange.End - 1Text属性返回或设置指定区域或所选内容中的文本。字符型。Text 属性返回选定部分或区域的无格式纯文本。设置该属性,可替换该区域或所选内容的文本。示例用“Dear”替换活动文档的第一个词。MyWord. ActiveDocument.Words(1).Text = Dear Type属性该属性返回Selection 对象选择的类型,返回值(只读)如下:0无Selection 对象 1IP类型 2普通文本3图文框 4表格列 5表格行6块状区域 7线形 8图形集合下例将所选内容复制到新文档中。If MyWord.Selection.Type = 2MyWord.Selection.CopyMyWord.Documents.Add.Content.PasteEndIfInformation 属性返回有关指定的所选内容或区域的信息。只读。语法:expression.Information(Type)expression必需。该表达式返回一个Range 或Selection对象。Type 数值型,必需。消息类型。以下是消息类型:1返回页码,在该页中包含指定的所选内容或区域的活动结尾。如果设置一个起始页码或进行其他手动调整,则返回经调整的页码(与 3 不同)。2返回节号,在该节中包含了指定的所选内容或区域的活动结尾。3返回页码,在该页中包含指定的所选内容或区域的活动结尾。从文档开头计数。忽略任何对页码的手动调整(与 1 不同)。4返回与所选内容或区域相关联的文档的页数。5-返回指定的所选内容或区域的水平位置。该位置是所选内容或区域的左边缘与页面的左边缘之间的距离,以磅为单位(20 缇 = 1 磅)。如果所选内容或区域不可见,则该参数返回 - 1。6返回所选内容或区域的垂直位置,即所选内容的上边缘与页面的上边缘之间的距离,以磅为单位(20 缇 = 1 磅)。如果所选内容未显示在文档窗口中,则该参数返回 - 1。7 返回指定的所选内容或区域相对于周围最近的正文边界左边缘的水平位置,以磅为单位(20 缇 = 1 磅,72 磅 = 1 英寸)。如果所选内容或区域未处于屏幕区域中,则该参数返回 - 1。8返回所选内容或区域相对于周围最近的正文边界的上边缘的垂直位置,以磅为单位(20 缇 = 1 磅,72 磅 = 1 英寸)。该参数可用于在文本框或表格中确定插入点的位置。如果所选内容未在屏幕中显示,则该参数返回 - 1。9返回指定的所选内容或区域中第一个字符的列位置。如果所选内容或区域是折叠的,则返回紧靠所选内容或区域右侧的字符列编号(该编号与状态栏中“列”前面的字符列数相同)。10返回指定的所选内容或区域中第一个字符的行位置。如果所选内容或区域是折叠的,则返回紧靠所选内容或区域右侧的字符行编号(该编号与状态栏中“行”前面的字符行数相同)。11如果所选内容或区域是一个完整的图文框或文本框,则该参数返回 .T.。12如果所选内容位于表格中,则该参数返回 .T.。13返回所选内容或区域起点所在表格的行号。14返回表格行号,在该表格行中包含指定的所选内容或区域的结尾。15返回指定的所选内容或区域中表格的最大行数。16返回所选内容或区域起点所在表格的列号。17返回表格列号,在该表格列中包含指定的所选内容或区域的结尾。18返回所选内容或区域中任何行的最大表格列数。19返回由 Percentage 属性设置的当前的放大百分比。20返回一个值,该值表明当前的选定模式,如下表所示。值选定模式0(零)常规选定1扩展选择(“EXT” 出现在状态栏上)2列选择(“列”出现在状态栏上)21如果大写字母锁定模式有效,则该参数返回 .T.。22如果数字键盘锁有效,则该参数返回.T.。23如果改写模式有效,则该参数返回 .T.。可用 Overtype 属性改变改写模式的状态。24如果修订功能有效,则该参数返回.T.。25如果指定的所选内容或区域位于普通视图的脚注或尾注窗格中,或页面视图的脚注或尾注区内,则本参数返回 .T.。26如果指定的所选内容或区域位于备注窗格,则该参数返回 .T.。28如果指定的所选内容或区域位于页眉或页脚窗格中,或者位于页面视图的页眉或页脚中,则该参数返回 .T.。31 如果指定的所选内容或区域位于表格的行结尾标记处,则该参数返回 .T.。32返回一个值,该值表明所选内容相对于脚注、尾注或备注引用的位置,如下表所示。值说明-1所选内容或区域包含,但不限于脚注、尾注或备注引用中。0(零)所选内容或区域不在脚注、尾注或备注引用之前。1所选内容或区域位于脚注引用之前。2所选内容或区域位于尾注引用之前。3所选内容或区域位于备注引用之前。33返回一个值,该值表明包含了指定的所选内容或区域的页眉或页脚的类型,如下表所示。值页眉或页脚的类型-1无(所选内容或区域不在页眉或页脚中)0(零)偶数页页眉1奇数页页眉(或在不区分奇数和偶数页时的页眉)2偶数页页脚3奇数页页脚(或在不区分奇数和偶数页时的页脚)4第一个页眉5第一个页脚34如果所选内容或区域位于主控文档(即至少包含一个子文档的文档)中,则该参数返回 .T.。35如果指定的所选内容或区域位于页面视图的脚注区内,或者位于普通视图的脚注窗格中,则该参数返回 .T.。36如果指定的所选内容或区域位于页面视图的尾注区内,或者位于普通视图的尾注窗格中,则该参数返回 .T.。37如果所选内容或区域位于主控文档(即至少包含一个子文档的文档)中,则该参数返回 .T.。38有关该常量的详细内容,请参阅 Microsoft Office Macintosh 版的语言参考帮助。(4)常用方法Copy 方法将指定对象拷贝到剪贴板。语法:expression.Copyexpression必需。该表达式返回以上一个 Range 或Selection 对象。Cut 方法将指定对象从文档中移到剪贴板上。语法:expression.Cutexpression 必需。该表达式返回一个 Field、FormField、Frame、MailMergeField、PageNumber、Range 或 Selection 对象。如果expression 返回 Range 或 Selection 对象,则将该对象中的内容剪切到剪贴板上,但是折叠的对象还保留在文档中。Paste 方法将剪贴板上的内容插入指定的区域或选定区域。如果不需要替换区域或选定区域的内容,可在用本方法之前先用 Collapse 方法。语法:expression.Pasteexpression 必需。该表达式返回一个 Range 或 Selection 对象。如果本方法用于区域对象,则将扩展该区域,使其包含剪贴板中的内容。如果本方法用于选定对象,则不会扩展所选内容,而是将所选内容置于已粘贴的剪贴板内容之后。Collapse 方法将某一区域或所选内容折叠到起始位置或结束位置。折叠之后起始位置和结束位置相同。语法:expression.Collapse(Direction)expression 必需。该表达式返回一个 Range 或 Selection 对象。Direction参数可选,数值型,指折叠某区域或所选内容的方向。1折叠到首部,0折叠到尾部。默认值为1。如果用 1 折叠一个代表完整段落的区域,则该区域将定位于段落结束标记之后(即下段开头)。但是,在该区域折叠后,可以用 MoveEnd 方法将区域回移一个字符。下例将所选内容折叠为选定部分的开头。MyWord.Selection.Collapse =1InsertBefore 方法在指定的选定内容或区域前插入指定文字。在插入文字之后扩展选定内容或区域,以包含新文字。如果选定内容或区域是书签,则书签也会扩展,以包含新文字。语法:expression.InsertBefore(Text)expression 必需。该表达式返回一个 Range 或 Selection 对象。Text 字符型,必需。要插入的文字。InsertAfter方法将指定文本插入某一区域或选定内容的后面。应用本方法可以扩展原区域或选定内容,使其包含新文本。语法:expression InsertAfter(Text)expression 必需。该表达式返回一个 Range 或 Selection 对象。Text 字符型,必需。要插入的文字。TypeText方法插入指定的文本。如果 ReplaceSelection 属性为.T.,则用指定文本替换所选内容。如果 ReplaceSelection 为假,则在所选内容之前插入指定的文本。语法:expression.TypeText(Text)expression 必需。该表达式返回一个 Selection 对象。Text 字符型,必需。要插入的文字。Delete 方法语法:expression.Deleteexpression 必需。该表达式返回一个 Range 或 Selection 对象。下例选择并删除活动文档中的内容。 MyWord.ActiveDocument.Content.Select MyWord.Selection.Delete移动插入点的方法Move 方法语法:expression.Move(Unit, Count)将指定区域或所选内容折叠到开始或结束位置,然后将折叠的对象移动指定数量的单位。本方法返回的数值表明对象实际移动的单位数。如果移动失败,则本方法返回 0。expression必需。该表达式返回一个Selection 或 Range对象。Unit数值型,可选。折叠的区域或所选内容移动距离的度量单位:1字符,4段落,5行,9列,10表格行,12单元格,15表格。默认值为1。Count数值型,可选。指定的区域或所选内容移动的单位数。如果 Count 是一个正数,则对象折叠到结束位置,并在文档中向前移动指定的单位数;如果 Count 是一个负数,则对象折叠到开始位置,并向后移动指定的单位数。默认值是 1。在使用 Move 方法之前也可以使用 Collapse 方法控制折叠的方向。如果区域或所选内容位于一个单位的中间,或者不能折叠,则将区域或所选内容向前或向后移动整个的单位。下例将所选区域折叠到下一段的段首,即将插入点移至下一段的段首。MyWord.Selection.Move(4,1)MoveDown 方法语法:expression.MoveDown(Unit, Count, Extend)将所选内容向下移动,并返回移动距离的单位数。expression必需。该表达式返回一个 Selection 对象。Unit 数值型,可选。所选内容移动距离的度量单位:4段落,5行。默认值是 5。Count数值型,可选。所选内容移动距离的单位数。默认值为 1。Extend数值型,可选。可为 0 或 1。如果是 0,则所选内容折叠到结束位置,并向下移动。如果是 1,则所选内容向下扩展。默认值为 0。下例将所选区域扩展2行。MyWord.Selection.MoveDown(5,2,1)MoveEnd 方法语法:expression.MoveEnd(Unit, Count)移动区域或所选内容的结束字符位置。本方法如果返回一个整数,表示区域或所选内容所移动的单元数;如果返回 0,则移动失败。expression必需。该表达式返回一个 Range 或 Selection 对象。Unit数值型,可选。所选内容移动距离的度量单位:1字符,4段落,9列,10表格行,12单元格。默认值为1。如果表达式的返回值是 Selection 对象,也可以使用 5。Count数值型,可选。指移动的单元数。如果为正数,则结束字符在文档中向后移动;如果为负数,则结束字符向前移动。如果结束位置已移至起始位置,则折叠该区域并移动首末两个字符的位置。下例将所选区域的结束位置后移一个字符。MyWord.Selection.MoveEnd(1,1)MoveEndUntil 方法语法:expression.MoveEndUntil(Cset, Count)移动指定区域或所选内容的结束位置,直到在文档中找到任何指定的字符。如果在文档中是向前移动,则扩展该区域或所选内容。本方法将区域或所选内容的结束位置的移动字符数以数值型返回。如果 Count 大于 0,则本方法返回移动字符数加 1 的值。如果 Count 小于 0,则本方法返回移动字符数减 1 的值。如果没有找到 Cset 字符,则不改变区域或所选内容,并且本方法返回 0。如果结束位置向后移动并超过原来的开始位置,则将开始位置设置为新的结束位置。expression必需。该表达式返回一个 Range 或 Selection 对象。Cset 字符型,必需。一个或多个字符。该参数区分大小写。Count 数值型,可选。指定区域或所选内容移动的最大字符数。如果 Count 是正数,则区域或所选内容在文档中向前移动。如果 Count 是负数,则区域或所选内容向后移动。默认向前移动。下例将所选区域扩展到直到 S 字符出现。MyWord.Selection.MoveEndUntil(S)MoveLeft 方法语法:expression.MoveLeft(Unit, Count, Extend)将所选内容向左移动,并返回移动距离的单位数。expression必需。该表达式返回一个 Selection 对象。Unit数值型,可选。所选内容移动距离的度量单位:1字符 12单元格。默认值为 1。Count数值型,可选。所选内容移动距离的单位数。默认值是 1。Extend数值型,可选。可以是 0 或 1。如果是 0,则所选内容折叠到起始位置,并向左移动。如果是 1,则所选内容向左扩展。默认值是 0。下例将所选内容折叠到起始位置,并向左移动1个字符。MyWord.Selection.MoveLeftMoveRight方法语法:expression.MoveRight(Unit, Count, Extend)将所选内容向右移动,并返回移动距离的单位数。expression必需。该表达式返回一个 Selection 对象。Unit数值型,可选。所选内容移动距离的度量单位:1字符 12单元格。默认值为 1。Count数值型,可选。所选内容移动距离的单位数。默认值是 1。Extend数值型,可选。可以是 0 或 1。如果是 0,则所选内容折叠到结束位置,并向右移动。如果是 1,则所选内容向右扩展。默认值是 0。下例将所选内容折叠到结束位置,并向右移动1个字符。MyWord.Selection.MoveRightMoveStart 方法语法:expression.MoveStart(Unit, Count)移动指定区域或所选内容的开始位置。本方法返回一个整数,该整数表明开始位置、该区域或所选内容实际移动的单位数,如果移动不成功,则本方法返回 0。expression必需。该表达式返回一个 Range 或 Selection 对象。Unit数值型,可选。所选内容移动距离的度量单位:1字符,4段落, 9列,10表格行,12单元格,15表格。默认值是 1。如果 expression 返回 Selection 对象,则也可以使用 5。Count数值型,可选。区域或所选内容移动的最大单位数。如果 Count 是正数,则区域或所选内容的开始位置在文档中向前移动。如果 Count 是负数,则区域或所选内容向后移动。默认值为 1。如果开始位置是向前移至结束位置之后,则折叠区域或所选内容,并且开始位置和结束位置移至同一位置。下例将所选内容的开始位置向前移动一个字符(即所选内容减少一个字符)。注意:一个空格也看作是一个字符。MyWord.Selection.MoveStart(1,1)下例将所选内容的开始位置移至该行的开头(所选内容扩展到行的开头)。MyWord.Selection.MoveStart(5,-1)MoveStartUntil 方法语法:expression.MoveStartUntil(Cset, Count)移动指定区域或所选内容的开始位置,直到在文档中找到任何指定的字符。如果在文档中是向后移动,则扩展区域或所选内容。本方法将指定区域或所选内容开始位置的移动字符数以数值型返回。如果 Count 大于 0,则该方法返回移动的字符数加 1。如果 Count 小于 0,则该方法返回移动的字符数减 1。如果未发现 Cset 字符,则不改变指定区域或所选内容,并返回 0。如果开始位置移动至结束位置后的位置,则折叠指定区域或选定内容,同时移动开始和结束位置。expression 必需。表达式返回一个Range 或 Selection对象。Cset字符型,必需。一个或多个字符。该参数区分大小写。Count数值型,可选。指定区域或所选内容移动的最大字符数。如果 Count 是正数,则区域或所选内容在文档中向前移动。如果 Count 是负数,则区域或所选内容向后移动。默认为向前移动。下例在文档中向后扩展所选内容,直到找到字母“I”。MyWord.Selection.MoveStartUntil(I, -100)如果在所选内容的第一段有美元字符 ($),下例将 myRange 移到该字符的前面。myRange = MyWord.Selection.Paragraphs(1).Rangeleng = myRange.End - myRange.StartmyRange.Collapse(1)myRange.MoveStartUntil($,leng)myRange.SelectMoveUp 方法语法:expression.MoveUp(Unit, Count, Extend)将所选内容向上移动,并返回移动距离的单位数。expression必需。该表达式返回一个 Selection 对象。Unit 数值型,可选。所选内容移动距离的度量单位:

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论