=EARTHQUAKE= Vibrates the form on the formload

by The_Twiggman (1 Submission)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 30^th January 2003
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate =EARTHQUAKE= Vibrates the form on the formload



                     ByVal High As Long) As Long
  Rand = Int((High - Low + 1) * Rnd) + Low
  'Coding To Make A Random Number Appear Between Two Values
End Function

'Just need a timer on the form with an interval
'Can change the values for horizontal and vertical

Private Sub Timer1_Timer()
horizontal = Rand(-100, 100)
vertical = Rand(-100, 100)
Form1.Left = Label1.Left + horizontal
Form1.Top = Label1.Top + vertical
End Sub

Download this snippet Add to My Saved Code

=EARTHQUAKE= Vibrates the form on the formload Comments

No comments have been posted about =EARTHQUAKE= Vibrates the form on the formload. Why not be the first to post a comment about =EARTHQUAKE= Vibrates the form on the formload.

=EARTHQUAKE= Vibrates the form on the formload

=EARTHQUAKE= Vibrates the form on the formload Comments

Post your comment

Difficulty