Déplacer des éléments d'une listbox

Désolé si cela a déjà été répondu avant, mais j'ai cherché sur le site et ne pouvait pas trouver quelque chose qui répond à ma question.

Je peux déplacer les éléments sélectionnés entre mes listes déroulantes, mais comment puis-je déplacer tous les éléments d'une listbox et de les ajouter à un autre? si possible, je voudrais ajouter le fond plutôt que de remplacer les éléments dans l'autre zone de liste.

Le codage je utiliser pour déplacer des éléments spécifiques est 

 Dim selectedItems = (From i In ListBox1.SelectedItems).ToArray()

    For Each selectedItem In selectedItems
        ListBox2.Items.Add(selectedItem)
        ListBox1.Items.Remove(selectedItem)
    Next

Je ne peux pas répondre à ma propre question pour une raison quelconque, mais merci beaucoup Heinzi, pour toute autre personne ayant le même problème que le codage suivant devrait vous aider.

Dim selectedItems = (De i Dans ListBox1.Les éléments).ToArray()

For Each selectedItem In selectedItems
    ListBox2.Items.Add(selectedItem)
    ListBox1.Items.Remove(selectedItem)
Next
  • Puisque vous ne pouvez pas répondre à votre propre question, j'ai déplacé mon commentaire à la réponse de sorte que vous pouvez le marquer (et, donc, de marquer cette question qu'a répondu).
InformationsquelleAutor JackSparrow | 2012-05-27
  1. 2

    Vous pouvez utiliser le même code, mais itérer ListBox1.Les objets plutôt que de ListBox1.SelectedItems:

    Dim itemsToMove = ListBox1.Items.ToArray()  ' to make a copy of the list of items

For Each item In itemsToMove
    ListBox2.Items.Add(item)
    ListBox1.Items.Remove(item)
Next
    InformationsquelleAutor Heinzi