ListBox et les Valeurs des éléments - Visual Basic 2010

Je suis en train d'écrire une petite application à l'aide de VISUAL BASIC 2010 (Il est venu emballé dans Visual Studio 2010).

J'ai une zone de liste configuré de façon à être peuplée par une base de données Access. La base de données a deux colonnes: 1) Nom de la Variable 2) Description.

Comme un exemple pour être utilisé dans ma question, voici un échantillon de mes données:

Nom De Variable Description
DOG1 le Chien qui est venu de la Famille 1

Maintenant, j'ai une zone de liste qui est remplie par la Description de la colonne. C'est ce dont j'ai besoin. Je veux cliquer sur un bouton et ensuite en fonction de l'élément est cliqué, l'affichage de son correspondant "Description" dans une zone de texte. Il s'agit, je crois, DisplayMember et ValueMember. J'ai réussi à le faire pour un seul élément à la fois. Ma question est, comment puis-je utiliser une boucle pour faire la même tâche pour plusieurs éléments qui pourraient être sélectionné dans la liste déroulante?

Voici mon Code qui fonctionne à 100% pour l'affichage cliqué sur un à la fois.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            TextBox1.Text = ListBox1.SelectedValue  
    End Sub

Je pensais que le suivant serait de travailler, mais il ne l'est pas et je ne sais pas trop pourquoi.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
        For i = 0 To ListBox1.SelectedValue - 1    
           TextBox1.Text = ListBox1.SelectedValue(i)
        Next i
End sub

Aussi, si c'est possible, j'aimerais prendre les éléments sélectionnés dans la listbox1 et d'afficher leurs valeurs dans une autre zone de liste. Je l'ai fait avant avec de simples listes déroulantes j'ai renseigné moi-même, mais maintenant que je travaille avec de la valeur et afficher les membres, je n'arrive pas à adapter le code:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i As Integer
        For i = 0 To Listbox1.SelectedItems.Count - 1
            Listbox2.Items.Add(Listbox1.SelectedItems.Item(i))
        Next i

Merci beaucoup pour l'aide à l'avance!

InformationsquelleAutor user2088174 | 2013-02-27