salut,
Actuellement, je suis entrain de créer une applic sur les drapeaux du monde entier. Dans la feuille qui m'intéresse, j'ai créer de slabels et une PictureBox qui a pour name de,propriétés Pic. Il y a un dossier qui s'appelle Drapeaux et dedans 5 dossiers dont Afrique, Asie, ... avec le sdrapeaux e chaque pays. J'aimerais afficher le drapeau centreafrique.gif dans Pic. Voici la procédure que j'ai introduite dans Form_Load mais à chaque fois, quand j'ouvre l afeuille, il me dit Fichier introuvable.
Private Sub Form_Load()
lTitle.Caption = "Question 1"
Label1.Caption = "Tapez la réponse de l aquestion dans l'espac eréservé à cet effet."
Label2.Caption = "Question"
Label3.Caption = "A quel pays correspond le drapeau ci-contre?"
Label4.Caption = "Réponse"
chemin1 = App.Path
If Right(chemin1, 1) <> "\" Then
chemin1 = chemin1 & "\"
End If
chemin1 = chemin1 & "Drapeaux\Afrique\"
Pic.Picture = LoadPicture(chemin1 & "centrearique.gif")
End Sub
qqun pourrait-il me dire où j'ai comis une erreur et comment y remédier?
Merci d'avance.
SDan