• Home
 · 
• Custom Controls/Forms/Menus
 · 
• A funny little thing to do. Many cool colours

A funny little thing to do. Many cool colours

A funny little thing to do. Many cool colours

Rate A funny little thing to do. Many cool colours

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

' set the interval to 75
' Add the this code into the Timer(tmrTime)
' ***********
Dim x,y
' ***********
R = rnd * 255
G = rnd * 255
B = rnd * 255
' ***********
x = Rnd * Me.ScaleHeight
y = Rnd * Me.ScaleWidth
' ***********
Me.DrawWidth = Rnd * 69
' ***********
Me.Pset = (x,y), RGB(R,G,B)
' ***********
' This is made by Morten D Carlsson
' I am on the school now.
' send my an mail "[email protected]
' oops... Bye