Je voudrai qu'une image de fond change en fonction du menu, j'explique :
J'ai une feuille qui est pareil pour tout, mais en fonction de si c un nouveau client ou un nouveau membre du personnel, le fond change.
j'ai deja un peu de code.. j'ai un select pour l'image :
Code :
- Select Case Index
- Case 0
- Picture = LoadPicture(App.Path & "\fond_clt.jpg" )
- Case 1
- Picture = LoadPicture(App.Path & "\fond_forf.jpg" )
- Case Else
- Picture = LoadPicture(App.Path & "\fond_prod.jpg" )
-
- End Select
|
et dans la feuille où il y a le menu, j'ai ca :
Code :
- ajout.Show
- Index = 0
- Unload Menu
|
Aurai-je fais une érreur ? (certainement mais je ne vois pas laquelle )