by Raghu (22 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 22nd June 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
To Draw a GradientPaint on the PictureBox
API Declarations
Dim i,j
'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