Discussion :

[douezz]

Bonjour j'aimerai afficher les valeurs qui se trouvent dans un dictionnaire dans un textbox.Seulement il ne m'affiche que le dernier élément.
Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
    Sub MiseEnFormeDonnees()
 
        Dim i As String
 
        For Each kvp As KeyValuePair(Of String, String) In Affichage.MenuMain
            i = kvp.Value
        Next kvp
        TextBox1.Text = i
    End Sub

merci

[douezz]

voici la solution petite erreur d'étourderie.

Code :

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

1
2
3
4
5
6
7
8
9
    Sub MiseEnFormeDonnees()
 
        Dim i As String
 
        For Each kvp As KeyValuePair(Of String, String) In Affichage.MenuMain
            i = i + kvp.Value + vbNewLine
        Next kvp
        TextBox1.Text = i
    End Sub

[Psycadi]

Et pourquoi ne pas faire?

Code :

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

1
2
3
4
5
6
7
Sub MiseEnFormeDonnees()
 
        For Each kvp As KeyValuePair(Of String, String) In Affichage.MenuMain
            TextBox1.Text += kvp.Value + vbNewLine
        Next kvp
 
    End Sub

[douezz]

Merci

[douezz]

J'ai encore un autre petit soucis...dans mon application j'ai 2 boutons, un qui doit permettre de monter l'autre de descendre...
plus précisément, lorsque ma liste de valeur est affichée
(Par exemple : ligne 1 --> toto, ligne 2 --> tata, ligne 3 --> titi )
j'aimerai pouvoir surligner (selectionner) la ligne sur laquelle je me trouve et lorsque j’appuie sur le bouton descendre ben la ligne suivante est surlignée...

en gros je me trouve sur la ligne toto et lorsque je clique sur le bouton qui permet de descendre ben je passe à la ligne tata etc etc et inversement..

le soucis c'est que je ne connait pas les controle qui permettent de faire tout sa.

si quelqu'un pouvait m'aider.
Merci

[Psycadi]

À ce moment là, il ne faut pas utiliser un textbox mais une listbox.

Et sur tes boutons tu changes la valeur de SelectedIndex de ta listbox.