用于在指定列表框控件或组合框控件所显示的值列表中添加新项。

expression.AddItem(Item, Index)

expression     必选。返回“应用于”列表中的一个对象的表达式。

Item     必选 String 型。新添项的显示文本。

Index     可选 Variant 型。项在列表中的位置。如果省略该参数，项就会添加到列表的尾部。

说明

指定控件的 RowSourceType 属性必须设为“值列表”。

这种方法只对窗体上的列表框或组合框才有效。

列表项编号从零开始。如果 Index 参数的值与已有的项编号不一致，就会出错。

对于多列列表，要使用分号来分隔每列的字符串（例如，对于一个三列列表有“1010;red;large”）。如果 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