Salut,
Je cherche comment remplir dynamiquement une listbox depuis une autre (toutes les 2 multiselections), et que lorsqu'on décoche un item dans la première les termes associés disparaissent dans la deuxième...
En faite je voudrai que chaque item ajoute et retire ses propres items dans la listebox2...
Voici un extrait de mon code :
Évidement ça ne marche pas... ca me met le premier choix en doublon...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged ListBox2.Items.Clear() For Each item In ListBox1.SelectedItems Dim ReadSQL As OleDbDataReader Dim CommandSQL As New OleDbCommand("*requete*" & ListBox1.SelectedItem & "*requete*" & labelbox.Text, moduleconnection) ReadSQL = CommandSQL.ExecuteReader Do While ReadSQL.Read() ListBox2.Items.Add(ReadSQL.GetValue(0) & " " & ReadSQL.GetValue(1)) Loop ReadSQL.Close() Next End Sub
Partager