Question

FormFields (FormField) DropDown ListEntries (ListEntry)

由 ListEntry 对象所组成的集合，该集合中的对象代表了下拉型窗体域中的所有项。

使用 ListEntries 集合

用 ListEntries 属性可返回 ListEntries 集合。下列示例显示位于名为“Drop1”的窗体域中的各项。

For Each le In _
 ActiveDocument.FormFields("Drop1").DropDown.ListEntries
 MsgBox le.Name
Next le

用 Add 方法可在下拉型窗体域中添加项目。下列示例插入一个下拉型窗体域，然后为其添加“red”、“blue”和“green”三项。

Set myField = _
 ActiveDocument.FormFields.Add(Range:=Selection.Range, _
 Type:=wdFieldFormDropDown)
With myField.DropDown.ListEntries
 .Add Name:="Red"
 .Add Name:="Blue"
 .Add Name:="Green"
End With

用 ListEntries (index) 可返回单个的 ListEntrie 对象，其中index是列表项名称或索引序号。索引序号代表该列表项在下拉型窗体域中的位置（第一项的索引序号是 1）。下列示例从名为“Color”的下拉型窗体域中删除“Blue”项。

ActiveDocument.FormFields("Color").DropDown _
 .ListEntries("Blue").Delete

下列示例显示名为“Color”的下拉型窗体域中的第一项。

MsgBox _
 ActiveDocument.FormFields("Color").DropDown.ListEntries(1).Name