Use this code to make a form shake. It is fun to use and can be used under any event.
codes :
'By LeSaN
'Easy code to make a form shake
Dim a As Integer 'Declaring integer "a"
While a < 10 'Starting a "while loop"
'Setting our form's X position...