如何使用VBA对窗体ListBox控件的多列列表框的数据进行添加与删除

如何使用VBA对窗体ListBox控件的多列列表框的数据进行添加与删除

思路如下：
1、Listbox本身并不带有删除和添加的功能，需要额外写代码
2、对于删除Listbox中的元素可以利用 AddItem（）、RemoveItem（）方法
3、如果是通过点击listbox 删除表中的元素。这需要给listbox添加事件。在事件中添加代码删除表格中的数据。

1. listbox 控件显示项目列表，从其中可以选择一项或多项。如果项目总数超过了可显示的项目数，就自动在 listbox 控件上添加滚动条。 如果未选定项目，则 listindex 属性值是 -1。列表的第一项是 listindex 0，listcount 属性值总是比最大的 listindex 值大 1。 2. 语法 listbox 3. 说明 使用 additem 或者 removeitem 方法可以添加或者删除 listbox 控件中的项目。对 list、listcount 和 listindex 属性进行设置就可以访问 listbox 中的项目。也可以在设计时使用 list 属性在列表中增加项目。 4. 实例    dim entry, i, msg   ' 声明变量。    msg = "choose ok to add 100 items to your list box."    msgbox msg   ' 显示信息。    for i = 1 to 100   ' 计数值从 1 到 100。       entry = "entry " & i   ' 创建输入项。       list1.additem entry   ' 添加该输入项。    next i    msg = "choose ok to remove every other entry."    msgbox msg   ' 显示信息。    for i = 1 to 50   ' 确定如何       list1.removeitem i   ' 每隔一项    next i   ' 删除。    msg = "choose ok to remove all items from the list box."    msgbox msg   ' 显示信息。    list1.clear   ' 清除列表框。