[求助]如何删除listbox中的选中项目
如何删除listbox中的选中项目.就是在listbox有若干项目.我有一个删除按钮.我想实现一按删除键就能删除listbox中我点选的项目
Option Explicit
Private Sub Command1_Click() Dim i As Long For i = List1.ListCount - 1 To 0 Step -1 If List1.Selected(i) = True Then List1.RemoveItem i End If Next End Sub '注意，要从后往前删除
