VB编程：麻烦每一步尽可能详细的告诉我

来源：百度知道 编辑：UC知道 时间：2024/06/20 14:36:46
麻烦每一步尽可能详细
使用list控件设计一个曲目选择单.要求双击"备选曲目"列表中的曲目,即可将该曲目移至"已选曲目"列表中;反之亦然.

Private Sub List1_DblClick()
List2.AddItem List1.List(List1.ListIndex)'将当前选定的添加到已选曲目
list1.RemoveItem(List1.ListIndex)'将已添加的曲目从备选曲目中移除
End Sub

Private Sub List2_DblClick()
List1.AddItem List2.List(List2.ListIndex) '将当前选定的添加到备选曲目中
List2.RemoveItem (List2.ListIndex)'将选定的曲木从已选曲目中移除
End Sub