如何将项目从一个列表框移动到另一个列表框

Question

使用VB6

在表单中，2列表框名称为list1，list2和4按钮名称＆gt;，＆gt;＆gt;，＆lt;，＆lt;＆lt;

I want to add the list1 selected items to list2
I want to remove the selected items from list2 to list1

如何做到这一点。

需要Vb6代码帮助

Answer 1

通常，您的方法是遍历源ListBox中所有项的索引值。如果您要移动ListBox上的所有项目，那么对于每个项目，您将在目标ListBox上调用AddItem方法（使用索引值来检索源ListBox上当前项目的文本）。然后，您将调用ListBox RemoveItem方法从源ListBox中删除相同的项目。

如果您只移动所选项目，那么您仍然会循环遍历所有索引值，但是您将对源ListBox上的每个项目使用Selected属性来确定是否已选择该项目。如果是，请使用上述步骤移动项目。

根据您在ListBox上设置一些属性的方式，具体取决于您需要做什么。您会发现有用的资源是the discussion on ListBoxes在thevbprogrammer.com上。请查看示例：使用两个列表框添加和删除项目;它包括你想要做的事情的例子。