如图所示,vb6.0中如何打开本地图像

我制作了一个菜单栏,其中我制作了一个打开文件(图片)的选项,请问如何做到点击打开然后有一个像图二一样的本地文件浏览器,选中文件后加载到图三中的picture里,求方法(最好有代码)

Windows7 + VisualBasic6.0

img

img

img


'选上 工程-部件-Microsoft CommonDialog Contral 6.0

Private Sub Command1_Click()
Dim file As String
    With comDlg
        .Filter = "All Files(*.*)|*.*|JPEG Images(*.jpg;*.jpeg)|*.jpg;*.jpeg|"
        .ShowOpen
    End With
    file = comDlg.FileName
   
    Picture1.Picture = LoadPicture(file)
End Sub