VB 编程人员请进?

来源：百度知道 编辑：UC知道 时间：2024/05/26 01:54:33
在VB里如何让一个列表框里的所有项点击一个命令按钮就让他转到另一个列表框里去啊?代码怎么写要,哪位高手请帮忙写写吧.

添加2个列表框和一个命令按纽，代码如下

Private Sub Command1_Click()
For i = 1 To List1.ListCount
List2.AddItem List1.List(i - 1)
Next
List1.Clear
End Sub

Private Sub Form_Load()
List1.AddItem "a"
List1.AddItem "b"
List1.AddItem "c"
End Sub