Removing Items from a Listbox with Multi-Select enabled

[microb0x]

I'm trying to remove a number of items selected in a mulitselect list
box.
the code
For Each varSel In lstAvailableFiles.ItemsSelected
lstAvailableFiles.RemoveItem (varSel)
Next varSel
This will remove the first item select the first time through the loop
but
after one item is removed the all items are deselected so you can't
tell
what others need to be removed ..i.e. the
lstAvailableFiles.ItemsSelected.count falls to 0 after one item is
removed
regardless how many items were originally selected.
Is there a work around ?

[Chuck Grimsby]

Try it like this:

For i = lstAvailableFiles.ItemsSelected.Count - 1 to 0 Step -1
lstAvailableFiles.Selected( _
lstAvailableFiles.ItemsSelected(i)) = False
Next i
On 22 Sep 2005 13:19:31 -0700, "microb0x" <wo*******@gmail.com> wrote:

I'm trying to remove a number of items selected in a mulitselect list
box.
the code
For Each varSel In lstAvailableFiles.ItemsSelected
lstAvailableFiles.RemoveItem (varSel)
Next varSel
This will remove the first item select the first time through the loop
but after one item is removed the all items are deselected so you can't
tell what others need to be removed ..i.e. the
lstAvailableFiles.ItemsSelected.count falls to 0 after one item is
removed regardless how many items were originally selected.
Is there a work around ?

--
Drive C: Error. (A)bort (R)etry (S)mack The Darned Thing