by -=FEAR=- (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 8th August 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Form Shake
Me.Width = Me.Width + 300
Me.Height = Me.Height + 300
Me.Left = Me.Left - 200
Me.Top = Me.Top - 200
Me.Width = Me.Width - 300
Me.Height = Me.Height - 300
Me.Left = Me.Left + 200
Me.Top = Me.Top + 200