多种对象![]() ![]() ![]() |
由 Range 对象所组成的集合,该集合中的对象代表了选定部分、区域或文档中的所有句子。没有 Sentence 对象。
用 Sentences 属性可返回 Sentences 集合。下例显示选定部分的句数。
MsgBox Selection.Sentences.Count & " sentences are selected"
用 Sentences(index) 可返回一个表示单句的 Range 对象,其中 index 为索引序号。索引序号代表该句在 Sentences 集合中的位置。下例为活动文档的首句设置格式。
With ActiveDocument.Sentences(1)
.Bold = True
.Font.Size = 24
End With
文档中本集合的 Count 属性返回主文字部分的项目数。要计算其他部分的项目数,请使用 Range 对象的集合。
对 Sentences 集合无法使用 Add 方法,而是用 InsertAfter 或 InsertBefore 方法向 Range 对象中添加句子。下例在活动文档首段之后插入一句。
With ActiveDocument
MsgBox .Sentences.Count & " sentences"
.Paragraphs(1).Range.InsertParagraphAfter
.Paragraphs(2).Range.InsertBefore "The house is blue."
MsgBox .Sentences.Count & " sentences"
End With