Question

多种对象 Fields (Field) 多种对象

代表一个域。Field 对象是 Fields 集合中的一个元素。Fields 集合包括了选定内容、区域或文档中的域。

使用 Field 对象

用 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 常量组的一部分。该常量组中包括各种域类型。