Ultimate Graphix
Ultimate Graphix
Rate Ultimate Graphix
(1(1 Vote))
'Set the timer control's interval property to 250
'Add the following code in the timer event of timer control
Private Sub Timer1_Timer()
Randomize
Me.BackColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)
Me.Move Rnd * 12000, Rnd * 9000, Rnd * 12000, Rnd * 9000
End Sub
Ultimate Graphix Comments
No comments yet — be the first to post one!
Post a Comment