ContentControlListEntries.Add 方法 (Word)

将新的列表项添加到下拉列表或组合框内容控件中，并返回 ContentControlListEntry 对象。

语法

表达式。添加 (文本、 值、 索引)

表达 返回 ContentControlListEntries 对象的表达式。

参数

名称	必需/可选	数据类型	说明
Text	必需	String	指定列表项的显示文本。 对应于 ContentControlListEntry 对象的 Text 属性。
Value	可选	String	指定列表项的值。 对应于 ContentControlListEntry 对象的 Value 属性。 如果省略它，则 Value 属性等于 Text 属性。
Index	可选	Long	指定新项在列表中的序号位置。 如果在指定的位置已有某项，则该现有项将在列表中下移。 如果省略它，则新项将添加到列表的末尾。

返回值

ContentControlListEntry

备注

[!注释] 列表中的项必须具有唯一的显示名称。 试图添加已存在的列表项会引发运行时错误。

示例

以下代码示例创建新的下拉列表内容控件，然后向它添加几个项。

Dim objCC As ContentControl 
Dim objLE As ContentControlListEntry 
Dim objMap As XMLMapping 
 
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList) 
 
'List items 
objCC.DropdownListEntries.Add "Cat" 
objCC.DropdownListEntries.Add "Dog" 
objCC.DropdownListEntries.Add "Equine" 
objCC.DropdownListEntries.Add "Monkey" 
objCC.DropdownListEntries.Add "Snake" 
objCC.DropdownListEntries.Add "Other"

另请参阅

ContentControlListEntries 集合

支持和反馈

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