Delete an item from a list box - how to? 1

[IlyaRabyy]

Colleagues,
I have a ListBox with the number of items in it, and USer needs need to remove one or two of these items, which he added erroneously. So, (s)he highlights them and clicks "Delete" button.
In the past (and another programming language) it was simple, something like this:

For I =  lstFiles.Items.Count -1 To 0 Step -1
	If lstFiles.Items(I).Selected() Then
		lstFiles.Items(I).Delete()
	End If
'Next

Ain't working in VS 2019 VB .NET, it throws exception:

Neither works the following:

lstFiles.ClearSelected()
lstFiles.Refresh()

It just don't do anything (albeit neither throws exception).

Please enlighten this "dinosaur" on how nowadays one does deletion of the selected items from a ListBox?

TIA!


Regards,

Ilya

 

[IlyaRabyy]

Colleagues,
The solution was found, and ridiculously simple one:

For I As Int32 = lstFiles.Items.Count - 1 To 0 Step -1
	
	If lstFiles.SelectedIndex() = I Then
		lstFiles.Items.RemoveAt(I)
	End If
	
Next I

Does anyone have a more simple solution?

Regards,

Ilya

 

[strongm]

Er ... that doesn't do quite what you think it does, I'm afraid.

It only removes the first selected item. If you have selected more than one item the remainder will not be removed.

Try the following:

[COLOR=blue]For i As Int32 = lstFiles.SelectedItems.Count - 1 To 0 Step -1
    lstFiles.Items.Remove(lstFiles.SelectedItems(i))
Next
lstFiles.ClearSelected()[/color]

 

[IlyaRabyy]

Tried your suggestion, StrongM, thank you!
Alas, it erred:

Something I'm missing, but - what?

Regards,

Ilya

 

[strongm]

Because you have are not using my code. You are incorrectly using a mix of your code and my code.

 

[IlyaRabyy]

That worked.
Thank you!
Problem solved.

Regards,

Ilya