共用方式為


ComboBox.AddItem 方法 (Access)

將新專案加入至指定的下拉式方塊控制項所顯示的值清單。

語法

運算式AddItem (專案索引)

表達 代表 ComboBox 物件的變數。

參數

名稱 必要/選用 資料類型 描述
項目 必要 String 新項目的顯示文字。
Index 選用 Variant 項目在清單中的位置。 如果省略此引數,項目會新增到清單的最後。

註解

指定之控制項的 RowSourceType 屬性必須設定為 [值清單]。

此方法只適用於表單上的清單方塊或下拉式方塊控制項。

清單項目號碼從零開始。 如果 Item 引數的值與現有項目號碼不相符,就會發生錯誤。

至於多欄清單方面,請使用分號來隔開每一欄的字串 (例如,三欄式清單使用 "1010;紅色;大")。 如果 Item 引數包含的字串比控制項的欄數還少,會從最左欄開始新增項目。 如果 Item 引數包含的字串比控制項內的欄數還多,會略過多出來的字串。

使用 RemoveItem 方法來移除值清單的項目。

範例

此範例會將項目新增到清單方塊控制項的清單最後。 要讓函數生效,您必須傳送它一個 ListBox 物件 (代表表單上的清單方塊控制項),以及一個 String 值 (表示要新增項目的文字) 傳送給該函數。

Function AddItemToEnd(ctrlListBox As ListBox, _ 
 ByVal strItem As String) 
 
 ctrlListBox.AddItem Item:=strItem 
 
End Function

此範例會將項目新增到下拉式方塊中的清單開頭。 要讓函數生效,您必須傳送它一個 ComboBox 物件 (代表表單上的下拉式方塊控制項),以及傳送一個 String 值 (表示要新增項目的文字)。

Function AddItemToBeginning(ctrlComboBox As ComboBox, _ 
 ByVal strItem As String) 
 
 ctrlComboBox.AddItem Item:=strItem, Index:=0 
 
End Function

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應