It makes the form divided into several blocks of different colors.
It makes the form divided into several blocks of different colors.
Rate It makes the form divided into several blocks of different colors.
(1(1 Vote))
AutoRedraw = True
Cls
ScaleHeight = 4
ScaleWidth = 4
mycolor = 0
For h = 0 To 3
For w = 0 To 3
Line (w, h)-(w + 1, h + 1), QBColor(mycolor), BF
mycolor = mycolor + 1
Next w
Next h
End Sub
It makes the form divided into several blocks of different colors. Comments
No comments yet — be the first to post one!
Post a Comment