Bonjour , voici mon problème.
J'ai des dictionnaires qui initialisent l'affichage dont voici un exemple:
le soucis est le suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 'déclaration des menu Public MenuConnexion As New Dictionary(Of String, String) Public MenuMain As New Dictionary(Of String, String) 'initialisation Sub initMenuConnexion() MenuConnexion.Add("0", "") MenuConnexion.Add("1", "Hors connexion") End Sub Sub initMenuMain() MenuMain.Add("0", "Supervision") MenuMain.Add("1", "Defauts") MenuMain.Add("2", "Essais")
je rempli ma listBox avec mes dictionnaire:
j'aimerai pouvoir passer d'un dictionnaire à l'autre.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Dim N As Integer N = ListBox1.SelectedIndex Select Case N Case 0 ListBox1.Items.Clear() For Each kvp As KeyValuePair(Of String, String) In Affichage.MenuSupervision ListBox1.Items.Add(kvp.Value) Next kvp Case 1 ... case 2 ... end select
par exemple quand je suis sur le menu "connexion" et que je suis qur Hors connexion et que je clique sur OK , sa m'affiche le menu "Main".
jusqu'ici sa marche mais je n'arrive pas a faire le bouton qui me permet de passer du menu "main" au menu "connexion" (en gros une sorte de bouton précédent)
merci
Partager