Question

如何使用ListBox 控件

将ListBox1中所选的项如何移动到ListBox2中？bcb编程

Answer 1

Dim j As Integer
For j = 0 To List1.ListCount - 1
If List1.Selected(j) = True Then
List2.AddItem List1.List(j)
End If
Next