Me.controls("") : Problème
Bonjours a tous,
j'ai un petit probleme de code :
Code:
1
2
3
4
5
6
7
|
While lecture_ini(Directory.GetCurrentDirectory & "\chargement.ini", Convert.ToString(i), "image", 200) <> Nothing
Me.Controls("PictureBox" & Convert.ToString(i)).BackgroundImage = Image.FromFile(lecture_ini(Directory.GetCurrentDirectory & "\chargement.ini", Convert.ToString(i), "image", 200))
i = i + 1
End While |
Le probleme viens du Me.controls("PictureBox" & Convert.ToString(i))
Il n'y a aucune erreur mais le programmesort de la fonction juste apres cette ligne et n'execute donc plus rien et l'image n'est donc pas chargée.
J'ai fait plusieurs tests :
--> "PictureBox" & Convert.ToString(i) est bien égale a "PictureBox1" qui est bien présent dans la form
--> lecture_ini est une fonction que j'ai créer qui fonctionne très bien
-->
Code:
1
2
|
Me.PictureBox1.BackgroundImage = Image.FromFile(lecture_ini(Directory.GetCurrentDirectory & "\chargement.ini", Convert.ToString(i), "image", 200)) |
Cela fonctionne tres bien.
J'ai deja fait certaine rechercher sur google mais je n'ai rien trouver
des idées?
