多种对象![]() ![]() ![]() |
代表一个域。Field 对象是 Fields 集合中的一个元素。Fields 集合包括了选定内容、区域或文档中的域。
用 Fields(index) 可返回单个的 Field 对象,其中 index 是索引序号。索引序号代表该域在选定内容、区域或文档中的位置。下列示例显示活动文档中第一个域的域代码和结果。
If ActiveDocument.Fields.Count >= 1 Then
MsgBox "Code = " & ActiveDocument.Fields(1).Code & vbCr _
& "Result = " & ActiveDocument.Fields(1).Result & vbCr
End If
用 Add 方法可在 Fields 集合中添加域。下列示例在选定内容的开头插入日期域并显示其结果。
Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
Type:=wdFieldDate)
MsgBox myField.Result
其中 wdFieldDate 常量是 WdFieldType 常量组的一部分。该常量组中包括各种域类型。