欧盟能抗衡美国吗:如何使用ListBox 控件

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/02 07:53:50
将ListBox1中所选的项如何移动到ListBox2中?bcb编程

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