This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f

by Siddharth Nayak (2 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 29^th November 2000
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks for user: JUST ADD A TIMER ON THE FORM. AND

Rate This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f



Static color As Integer
If color <> 15 Then
color = color + 1
Else
color = 0
End If
x = Int((ScaleWidth - (ScaleWidth / 20)) * Rnd + (ScaleWidth / 20))
y = Int((ScaleHeight - (ScaleHeight / 20)) * Rnd + (ScaleHeight / 20))
DrawWidth = 20
PSet (x, y), QBColor(color)

End Sub

Download this snippet Add to My Saved Code

This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f Comments

No comments have been posted about This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f. Why not be the first to post a comment about This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f.

This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f

This simple code will fill the form with varieties of colourful balls in a wonderful style. Tasks f Comments

Post your comment

Difficulty