Listenindex überschreitet das Maximum (9).

[dizzy]

Indem du ein Item löschst, veränderst du ja den Wert von Count. Nimm hierzu besser eine while-Schleife:
while ListBox1.Count > 0 do ListBox1.Items.Delete(0);