• Home
 · 
• Graphics
 · 
• To draw circles

To draw circles

To draw circles

Rate To draw circles

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Timer1.Interval = 100
End Sub


Private Sub Timer1_Timer()
For i = 1 To 5000 Step 60
DrawCircle.Circle (DrawCircle.ScaleWidth / 2, DrawCircle.ScaleHeight / 2), i, RGB(255, 20, 255) * Rnd
Next
End Sub