Question

vb中，怎么把Listview中的选择的多行，插入到另外一个listview中。

选中多行就是Listview的checkbox属性为True。举例说明最好。

Answer 1

Option Explicit

Private Sub Form_Load()
Dim i As Integer
For i = 1 To 10
List1.AddItem LTrim(i)
Next i
End Sub

Private Sub List1_Click()Dim i
List2.Clear
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then List2.AddItem List1.List(i)
Next i
End Sub