展开全部
请说明,在允许同时选择多个项目,是什么项目,是文件,还是VB中的多选按钮,还是……
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Command1_Click()
List2.Clear
For i = 0 To List1.ListCount - 1
If List1.Selected(i) = True Then List2.AddItem List1.List(i)
Next i
End Sub
Private Sub Form_Load()
For i = 1 To 20
List1.AddItem i
Next
End Sub
测试通过
List2.Clear
For i = 0 To List1.ListCount - 1
If List1.Selected(i) = True Then List2.AddItem List1.List(i)
Next i
End Sub
Private Sub Form_Load()
For i = 1 To 20
List1.AddItem i
Next
End Sub
测试通过
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
selecteditems
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询