How to change color in Picture Box

Home » Graphics » How to change color in Picture Box

Posted on January 5, 2009

'Graphics - How to change color in Picture Box

Option Explicit
 
'Add a PictureBox control and set its AutoRedraw property to True.

Declare Function SetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, _
    ByVal crColor As Long) As Long
 
Private Sub Command1_Click()
    Dim s As Long
    s = SetPixel(Picture1.hdc, 10, 10, RGB(255, 0, 0))
    Picture1.Refresh
End Sub