[VB.NET] Simulare dei clic e uso del threading

[Neptune]

Perchè ho provato a cambiare il codice così

My.Application.DoEvents()
            Threading.Thread.Sleep(5000)
            My.Application.DoEvents()
            SimulateClick(pnt)
            My.Application.DoEvents()
            Threading.Thread.Sleep(5000)
            My.Application.DoEvents()
            SimulateClick(pnt2)
            My.Application.DoEvents()
            Threading.Thread.Sleep(5000)
            My.Application.DoEvents()

Ma praticamente "mi fa vedere la finestra a tratti" e comunque non mi ci fa cliccare gli altri pulsanti.