by Bj?rn ?kesson (4 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 30th March 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Move a Form (The easiest way)
Private Sub Form_Load()
Timer1.Interval = 22
End Sub
Private Sub Timer_Timer()
'Move Form Down
Form1.Top = Form1.Top + 50
'Move Form Up
Form1.Top = Form1.Top - 50
'Move Left
Form1.Left = Form1.Left - 50
'Move Form Right
Form1.Left = Form1.Top + 50
End Sub