[VB.NET] Rimuovere tutti gli elementi selezionati in un controllo CheckedListBox

[grandissimu]

Vorrei con un pulsante rimuovere tutti gli elementi spuntati in una checkedlistbox.
Ovviamente con un ciclo for non riesco perchè mi cambia gli indici mentre rimuovo gli elementi.
Allo stesso modo con un for each su tutti i checkeditems cambia anche qui gli indici e non rimuove due item consecutivi.
Non riesco a trovare una soluzione. Chi conosce il comando magico?

Ciao a tutti.

[pietro09]

Originariamente inviato da grandissimu
Vorrei con un pulsante rimuovere tutti gli elementi spuntati in una checkedlistbox.
Ovviamente con un ciclo for non riesco perchè mi cambia gli indici mentre rimuovo gli elementi.
Allo stesso modo con un for each su tutti i checkeditems cambia anche qui gli indici e non rimuove due item consecutivi.
Non riesco a trovare una soluzione. Chi conosce il comando magico?

Ciao a tutti.

Dim c = Me.CheckedListBox1

Do While c.CheckedItems.Count > 0
	c.Items.Remove(c.CheckedItems(0))
Loop

così mi pare che vada