To Draw a GradientPaint on the PictureBox
To Draw a GradientPaint on the PictureBox
API Declarations
Dim i,j
Rate To Draw a GradientPaint on the PictureBox
(2(2 Vote))
'the Command Button Write the Following Coding
Private Sub Command1_Click()
For i = 0 to Picture1.Width - 100
For j = 0 to Picture1.Height - 100
SetPixel Picture1.hDC,i,j,RGB(i,j,i)
Next j
Next i
End Sub
To Draw a GradientPaint on the PictureBox Comments
No comments yet — be the first to post one!
Post a Comment