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"
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。