ouvri une image avec cmd dialog

Bonsoir
débutant VB6
avec un bouton parcourir
je n'arrive pas a trouver l'erreur pour ouvrir une photo dans une Image1 ou PctureBox1
erreur = object required
voici mon Code
Private Sub cmdParcourir_Click()
Dim chemin, img As String
Comdial.InitDir = App.Path & "\Photos" 'si nécessaire Comdial.InitDir = "c:\???????"
   
    Comdial.Filter = "Fichier Jpg(*.jpg)|*.jpg|Fichier Gif(*.gif)|*.gif"
    Comdial.FilterIndex = 1
    
     
Comdial.DialogTitle = vbLf & "Seul les formats (,jpg,gif) sont acceptées    " & Time
Comdial.ShowOpen
Comdial.CancelError = True   'permet d'annuler

chemin = (App.Path & "\Photos\" & Comdial.FileTitle)

img = Comdial.FileTitle
Image1.Picture = chemin    'ou img
End Sub

Merci

je pense plutot que tu doit nommer le control commondialog correctement comme il est sur le code verifies l'ortographe comdial bonne chance