Code qui s'execute mal

Bonjour,

J'ai écrit un code en VB6 pour insérer une image dans une picturebox mais lorsque je l'exécute, la picturebox s'ouvre sans l'image. Peut-être que j'indique mal le chemin d'accès au fichier. Pouvez-vous m'aider svp ?
Voici mon code (j'ai écrit ce code dans un module):

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Private Sub Command1_Click()   Dim chemin As String   chemin = App.Path If Right(chemin, 1) <> "\" Then chemin = chemin & "NOM DE MON CHEMIN : C:\\Users\Mes documents" End If chemin = chemin & "NOM DE L'IMAGE : image" Picture1.Picture = LoadPicture(chemin)   End Sub

---

Merci d'avance :ccool:

Citation:

---

Envoyé par abcdefghijklm

Peut-être que j'indique mal le chemin d'accès au fichier.

---

Bonjour,

peut être effectivement...
Je n'ai absolument pas compris où se trouve ton image, si c'est dans le répertoire de ton application ou dans "Mes documents".

Si c'est dans le répertoire de ton application et qu'on prend comme exemple que ton image s'appelle "MonImage.jpg" il suffit d'écrire :

Code:

---

1 2	chemin = App.Path & "\MonImage.jpg"

---

Si c'est dans le répertoire "Mes Documents" et qu'on prend comme exemple que ton image s'appelle "MonImage.jpg" il suffit d'écrire :

Code:

---

chemin = "C:\Users\Mes documents\MonImage.jpg"

---

Bonjour et merci pour ta réponse OhMonBato.

En fait, mon application se trouverait dans Mes Documents.
J'ai donc essayé le code suivant :

Code:

---

1 2 3 4 5 6 7 8

Private Sub Command1_Click()   Dim chemin As String   chemin = "C:\Users\Mes documents\MonImage.jpg" Picture1.Picture = LoadPicture(chemin)   End Sub

---

mais ça ne marche toujours pas.
Dans l'idéal j'aurais aimé faire une sorte d'explorateur de fichiers avec VBA d'où le reste du code, mais je ne vois pas où ça coince.

Citation:

---

Envoyé par abcdefghijklm

Code:

---

1 2	chemin = "C:\Users\Mes documents\MonImage.jpg"

---

---

Tu est sur que ce répertoire existe ? ne manque-t'il pas ton nom (login..) quelque part ?

Citation:

---

Envoyé par abcdefghijklm

mais ça ne marche toujours pas.

---

Tu entends quoi par la ?( c'est comme les petits bateaux .. ton code il n'as pas de jambe) ..
[ame="http://www.youtube.com/watch?v=CZgQj2lFirs&feature=player_embedded"]YouTube - Maman les petits bateaux[/ame]

Citation:

---

Envoyé par abcdefghijklm

Dans l'idéal j'aurais aimé faire une sorte d'explorateur de fichiers.

---

Je comprends pas .. ton but ce n'est pas d'afficher une image , d'ailleurs il est ou ton contrôle picture ?

Citation:

---

Envoyé par abcdefghijklm

avec VBA d'où le reste du code, .

---

VBA ? ou VB6 ?


[Edit] Bon désolé pour ce message mais c'est dimanche on travaille pas ...