Discussion :

[Aladin_23]

Bonjour le forum
j' ai un champ txtFDemarrage avec un spin Bouton et un controle Image. Le champ txtFDemarrage prend des valeur de 0 à 4.
Les Images sont stocke dans CurrentProject.path & "\Images\, et nommer 0.bmp, 1.bmp, ..etc
je voudrais que chaque fois que le txtFDemarrage change de valeur, que l' image correspondant s' affiche dans le controle image.
Je n' ai pas creer de champ pour stocker le nom de l' Image.
J' ai commence le code suivant sur Apres Maj du controle txtfDemarrage

Private Sub txtFDemarrage_AfterUpdate()
If txtFDemarrage.Value = 0 Then Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\0.bmp
Le reste du code est de la meme forme. Le code ne me donne pas de resultat


Merci d' avance pour l' aide
Aladin

[Aladin_23]

bonsoir le forum
J' ai continué sur mon idée de mon code et remplace
If txtFDemarrage.Value = 0 Then Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\0.bmp
par
If me.txtFDemarrage.Value = 0 Then Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\0.bmp
ça fonctionne mais pas tres efficae.
Aladin

[adt301]

bonsoir le forum
J' ai continué sur mon idée de mon code et remplace
If txtFDemarrage.Value = 0 Then Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\0.bmp
par
If me.txtFDemarrage.Value = 0 Then Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\0.bmp
ça fonctionne mais pas tres efficae.
Aladin

bonjour,

et quelque chose comme ceci ne serait-il pas plus simple ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.ImgSplashScreen.Picture = CurrentProject.path & "\Images\" & me.txtFDemarrage.Value & ".bmp"

que veut dire "pas très efficace ?"