• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Makes many colors on your form pixel by pixel using a loop .

Makes many colors on your form pixel by pixel using a loop .

Makes many colors on your form pixel by pixel using a loop .

Rate Makes many colors on your form pixel by pixel using a loop .

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

frmMain.DrawWidth = 4
Do
Xpos = Rnd * frmMain.ScaleWidth
Ypos = Rnd * frmMain.ScaleHeight
Color = Rnd * 15
PSet (Xpos, Ypos), QBColor(Color)
Counter = Counter + 1
Loop Until Counter >= 1000