请教，用vb怎么读入一幅图片啊，我急用。

loadpicture

Private Sub cmdGraph_Click()
Dim g_sourceGraphName as string   
        dlgGraph.filename = ""
        dlgGraph.Flags = 4096
        dlgGraph.Filter = "JPG|*.JPG|JPEG|*.JPEG|BMP|*.BMP|GIF|*.GIF"
        dlgGraph.FilterIndex = 1
        dlgGraph.DialogTitle = "打开图形文件"
        dlgGraph.ShowOpen
   
        g_sourceGraphName = dlgGraph.filename
   
        If IsNull(g_sourceGraphName) Or IsEmpty(g_sourceGraphName) Or g_sourceGraphName = "" Then
            Exit Sub
        End If
   
       imgGraph1.Picture = LoadPicture(g_sourceGraphName)
End Sub

可参考这个：
https://bbs.bccn.net/thread-233913-1-1.html

谢谢各位啊！