vb列表框内容添加和删除

1、首先，打开VB软件，在窗体上面添加一个列表框，如下图所示。

2、单击列表框，在属性窗口中，设置列表框的属性和内容，如下图所示。

3、在窗体上面，添加两个命令按钮，如下图所示。

4、分别设置，两个命令按钮的属性，名称分别为“复制”，“清除”，如下图所示。

5、双击“清除”命令按钮，编辑其代码，如下图所示。

6、运行程序，验证结果。选中列表框中的“语文”，点击“复制”命令按钮，则在列表框中，复制了“语文”项目；再选择“政治”，点击“清除”命令按钮，则列表框中“政治”项目消失。如下图所示。

additem是listbox的一个方法，有两个参数，第一个参数是添加到listbox中的文本Item as string，第二个参数是添加到listbox中的索引Index as long，该索引对应列表中的第几项，是个可选参数。

例如1：列表框为LIST1，把文本框TEXT1的内容加入，这样写：LIST1.ADDITEM TEXT1.TEXT。

例如2：在窗体是添加了一个名为NameList的listbox，现在在其中添加几个项目：李华、李明、内燕子、小芳，可以在这么写：

NameList.Additem "李华"

NameList.Additem "李明"

NameList.Additem "燕子"

NameList.Additem "小芳"

扩展资料：

当 RowSourceType 属性设置为 0 (None) 时，可使用 additem 方法或 addlistitem 方法。每个添加到组合框或列表框中的数据项都有两个标识号：

nItemID，这是一个与控制中数据项的唯一标识 ID 相关的整数。除非指定了其他的 nIndexID 值，第一个数据项的 nIndexID 值为 1。 nIndex，这是一个与控制中数据项显示顺序有关的整数，在控制中第一个数据项的 nIndex值为 1。

参考资料来源：百度百科-additem方法

用Addltem就行了：

List1.AddItem "第1项"

List1.AddItem "第2项"

List1.AddItem "第3项"

List1.AddItem "第4项"

语法：Control.AddItem(cItem [, nIndex] [, nColumn])

参数：

cItem

指定添加到控制中的字符串表达式，必选参数。

nIndex

指定控制中放置数据项的位置。如果指定了有效的 nIndex 值，cItem 将放置在控制的正确位置。如果指定的 nIndex 已经存在，数据项将插入到这个位置，在这个数据项后面的其他所有数据项在组合框或列表框控制的列表区中向下移一个位置。如果忽略参数 nIndex，并且 Sorted 属性设置为“真”(.T.)，则 cItem 数据按字母排序方式添加到队列；如果忽略参数 nIndex，并且 Sorted 属性设置为“假”(.F.)，则 cItem 将添加到组合框或列表框控制的列表区未尾，可选参数

nColumn

指定控制的列，新数据项加入到此列中。默认值为 1。可选参数

参考资料：百度百科

---