Question

List1.RemoveItem List1.ListIndex 是什么意思

Answer 1

写好的程序来了,我自己已经验证过了,程序不会出错,只要你选择好要添加或删除的行后,单击按钮就会OK了!

Private Sub Command1_Click()
If List1.ListCount > 0 And List1.Text <> "" Then
List2.AddItem List1.Text
List1.RemoveItem List1.ListIndex
End If
End Sub

Private Sub Command2_Click()
If List2.ListCount > 0 And List2.Text <> "" Then
for i=0 to list2.listcount
if list2.selected(i)=true then
List1.AddItem List2.Text
List2.RemoveItem List2.ListIndex
next
End If
End Sub

你试试吧,以后互相学习了!!!
这样应该可以了吧,你试试!!!

找别人复制的,别介意!!