ListBox abarbeiten?

[exception]

Ich habe eine Listbox mit Items und möchte die nacheinandere per My.Computer.Keyboard.Sendkeys absenden. In einer Endlos schleife.
Immer und immre wieder von Oben nach unten

Kann mir bei der Erklärung wer helfen? x)

Dim x as Boolean = True

Threading.Thread.Sleep(3000)

While x = True

For Each item In ListBox1.Items
SendKeys.Send(item)
Next
Threading.Thread.Sleep(3000)

End While 

x muss global definiert werden damit du in einer anderen Sub darauf
zugreifen kannst. Ab jetzt werde ich keine weitere Frage von dir beantworten
denn wie's scheint hast du keinen Plan.