Bonjour,

je suis débutant en code et j'aimerai via une listbox permettre un choix.
J'ai donc crée ma listbox que j'ai intitulé "Listchoix" avec 3 list

1- Premier choix
2- Second choix
3- Dernier choix

Là ou cela se complique cest que Chaque choix correspond à un chiffre.
Ex : 1- Premier choix = 1080
2- Second Choix = 720

J'aimerai donc que ma "Listchoix" affiche les intitulés ci-dessus et que en définitive : CHOIX = 1080 ou 720 etc...


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Form_Load()
dim p as long
 
p = frmMainMenu.ListChoix
 
If p = "1- Premier choix" Then p = 1080
If p = "2- Second Choix" Then p = 720
If p = "3- Dernier choix" Then p = 480
 
CHOIX = p

Quelqu'un à une idée, mon code doit etre mauvais à ce niveau : p = frmMainMenu.ListChoix

Merci pour votre aide et bonnes fêtes à vous