我和女同桌的那一夜:这段代码错在哪里啊(VB)
来源:百度文库 编辑:高校问答 时间:2024/04/30 04:48:22
Private Sub Form_Load()
lst1.List(0) = "文件"
lst1.List(1) = "编辑"
End Sub
Private Sub lst1_DbClick()
lst2.AddItem lst1.Text
lst1.RemoveItem lst1.ListIndex
End Sub
Private Sub lst2_Click()
lst1.AddItem lst2.Text
lst2.RemoveItem lst2.ListIndex
End Sub
我是要在lst1里双击一个列表,该列表就会移到lst2,如果在lst2里双击一个列表,该列表就会移到lst1
sorry,原来dblclick少打了一个l呵呵
lst1.List(0) = "文件"
lst1.List(1) = "编辑"
End Sub
Private Sub lst1_DbClick()
lst2.AddItem lst1.Text
lst1.RemoveItem lst1.ListIndex
End Sub
Private Sub lst2_Click()
lst1.AddItem lst2.Text
lst2.RemoveItem lst2.ListIndex
End Sub
我是要在lst1里双击一个列表,该列表就会移到lst2,如果在lst2里双击一个列表,该列表就会移到lst1
sorry,原来dblclick少打了一个l呵呵
sorry!
你这个代码我完全没有看明白你要做什么
而且,你一开始 list 里面有东西吗?如果没有的话,你只能通过 AddItem 来添加。