用vb6写个代码，实现用GDI+库显示png图片

以下是使用VB6和GDI库显示PNG图像的示例代码：

首先，您需要在VB6中添加一个PictureBox控件，并将其命名为“picDisplay”。

然后，您需要在代码中添加以下内容：

Private Declare Function LoadImage Lib "user32" Alias "LoadImageA" (ByVal hInst As Long, ByVal lpsz As String, ByVal dwImageType As Long, ByVal dwDesiredWidth As Long, ByVal dwDesiredHeight As Long, ByVal dwFlags As Long) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long

Private Sub Form_Load()
Dim pic As Long
pic = LoadImage(0, "C:\image.png", 0, 0, 0, &H10)
If pic <> 0 Then
picDisplay.AutoRedraw = True
picDisplay.PaintPicture picDisplay.Image, 0, 0, picDisplay.Width, picDisplay.Height, 0, 0, picDisplay.Width, picDisplay.Height, vbSrcCopy
DeleteObject pic
End If
End Sub

在这段代码中，我们使用LoadImage函数从指定路径加载PNG图像。然后，我们将PictureBox的AutoRedraw属性设置为True，并使用PaintPicture方法在PictureBox上绘制图像。最后，我们使用DeleteObject函数释放图像句柄，以防止内存泄漏。

请注意，此代码仅适用于Windows平台，并要求您已经安装了PNG图像的支持库。