Discussion :

[Invité]

bonjour , je voudrais savoir comment faire pour copier les éléments sélectionnés dans une listbox 1 dans une autre listebox2 , sous vb 2010
merci

[-N4w4k-]

Salut,

Essaie ça:

Code :

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

ListBox2.Items.AddRange(ListBox1.SelectedItems)

[Invité]

non ca marche pas

[-N4w4k-]

Oui c'était trop simple... (j'avais pas essayé )


Essaie plutôt ça (là j'ai essayé )

Code :

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

1
2
3
        Dim items(ListBox1.SelectedItems.Count - 1) As Object
        ListBox1.SelectedItems.CopyTo(items, 0)
        ListBox2.Items.AddRange(items)

[Invité]

ca marche pas le probleme c'est que les valeurs qui s'affichent dans la listbox2 c'est system.data.datrow

[-N4w4k-]

Ok.

Marque ça alors:

Code :

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

1
2
3
4
5
6
        ListBox2.DisplayMember = ListBox1.DisplayMember 'colonne de la datatable à afficher quand la datasource est une datatable
        ListBox2.ValueMember = ListBox1.ValueMember 'pas obligé..
 
        Dim items(ListBox1.SelectedItems.Count - 1) As Object
        ListBox1.SelectedItems.CopyTo(items, 0)
        ListBox2.Items.AddRange(items)