VB6 Help Needed

[Bizzeh]

Option Explicit

Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long

Public sFile As String

Private WithEvents PNG As cPNG


Private Sub Command1_Click()

CommonDialog1.Filter = "PNG|*.png"
CommonDialog1.ShowOpen
sFile = CommonDialog1.FileName

PNG.LoadPNGFile (sFile)
PNG.DrawToDC Picture1.hDC, 0, 0
Picture1.Refresh
End Sub


Private Sub Form_Load()
Set PNG = New cPNG

End Sub



how do i set and image box to show what has just been brought in to the picture box so i can get it to save???

[eleet-2k2]

What about:

Image1.Picture = [pic file here that you opened]