Sintaks untuk Menggetarkan Form

Buat Project baru dengan 1 Form
Tambahkan kontrol ke Form1 :
1 Button (Button1).
Tulis kode ini di event Button1_Click :

Me.Top -= 5
Threading.Thread.Sleep(10)

Me.Top += 5
Me.Left += 5
Threading.Thread.Sleep(10)

Me.Top += 5
Me.Left -= 5
Threading.Thread.Sleep(10)

Me.Top -= 5
Me.Left -= 5
Threading.Thread.Sleep(10)

Me.Left += 5