Word) (ContentControlListEntries.Add 方法
會將新的清單項目加入至下拉式清單或下拉式方塊內容控制項，並傳回 ContentControlListEntry 物件。
語法
運算式。新增 (文字、 值、 索引)
表達 會傳回 ContentControlListEntries 物件的 運算式。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| 文字 | 必要 | 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 支援與意見反應。