【#vblistbox控件（含复选框） 多选操作代码怎么写#】

你可以用楼上的代码移除LIST的选项，要删除文件需要知道目录的位置，用KILL语句删除，修改上面的代码即可

Private Sub Command1_Click() Dim i As Long For i = 0 To List1.ListCount - 1 If List1.Selected(i) = True Then List1.RemoveItem (i) '删除选中项 End If Next End Sub

ListBox .MultiSelect = fmMultiSelectExtended这句话是让你的listbox可以多选（按住ctrl或者shift） For i = 0 To List1.ListCount - 1 If List1.Selected(i) = True Then List1.RemoveItem (i) '删除选中项 End If Next 循环遍历选中

【#vblistbox控件（含复选框） 多选操作代码怎么写#】到此分享完毕，希望对大家有所帮助。