使用英语阅读

通过


Word) (DropDown 对象

代表包含一个窗体选项列表的下拉型窗体域。

备注

使用 FormFields (索引) ,其中 index 是索引号或与下拉窗体域关联的书签名称,以返回单个 FormField 对象。 使用 下拉列表下面 的示例将返回一个 下拉列表 对象的属性。 下面的示例在活动文档中名为"下拉列表"的下拉型窗体域中选定的第一个项目。

ActiveDocument.FormFields("DropDown1").DropDown.Value = 1

索引号代表窗体域的 窗体域 中的位置 集合。 下面的示例检查活动文档的第一个窗体域的类型。 如果是下拉型窗体域,则选中第二项。

If ActiveDocument.FormFields(1).Type = wdFieldFormDropDown Then 
 ActiveDocument.FormFields(1).DropDown.Value = 2 
End If

以下示例在向 ffield 窗体域中添加选项以前,判断该下拉型窗体域是否有效。

Set ffield = ActiveDocument.FormFields(1).DropDown 
If ffield.Valid = True Then 
 ffield.ListEntries.Add Name:="Hello" 
Else 
 MsgBox "First field is not a drop down" 
End If

使用 添加 要添加一个下拉型窗体域的 窗体域 集合的方法。 下面的示例在活动文档的开头添加一个下拉型窗体域,然后将项目添加到窗体字段。

Set ffield = ActiveDocument.FormFields.Add( _ 
 Range:=ActiveDocument.Range(Start:=0, End:=0), _ 
 Type:=wdFieldFormDropDown) 
With ffield 
 .Name = "Colors" 
 With .DropDown.ListEntries 
 .Add Name:="Blue" 
 .Add Name:="Green" 
 .Add Name:="Red" 
 End With 
End With

属性

另请参阅

Word 对象模型参考

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。