15问答网 > 如何将LISTBOX多项选中的值一起复制到下一个LISTBOX里我是VS2008里的用的VB语言希望告诉帮忙在线等

如何将LISTBOX多项选中的值一起复制到下一个LISTBOX里我是VS2008里的用的VB语言希望告诉帮忙在线等

2025-05-14 10:56:28

推荐回答（2个）

回答1：

ListBox1 ListBox2
首先设置ListBox1 的 SelectionMode = MultiSimple
如下代码:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
For i = 0 To ListBox1.SelectedItems.Count - 1
ListBox2.Items.Add(ListBox1.SelectedItems(i))
Next
End Sub

回答2：

是选中的项复制？
Private Sub Command1_Click()
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then List2.AddItem List1.List(i)
Next
End Sub

如何将LISTBOX多项选中的值一起复制到下一个LISTBOX里 我是VS2008里的 用的VB语言 希望告诉帮忙 在线等

如何将LISTBOX多项选中的值一起复制到下一个LISTBOX里我是VS2008里的用的VB语言希望告诉帮忙在线等