Como borrar los items seleccionados de un listbox??



For i = Aquien.ListCount - 1 To 0 Step -1
 If Aquien.Selected(i) Then
   Aquien.RemoveItem i
 End If
Next i