如何用VB在command上输出代码将list1中选中的数据移动到list2中
1个回答
展开全部
Private Sub Command1_Click()
List2.AddItem List1.List(List1.ListIndex)
If List1.ListIndex <> -1 Then
List1.RemoveItem List1.ListIndex
End If
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 5
List1.AddItem i
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
