Переместить элементы между списком

Question

Извините, если раньше был дан ответ, но я искал сайт и не нашел ничего, что отвечало на мой вопрос.

Я могу перемещать выбранные элементы между моими списками, но как переместить все элементы из одного списка и добавить их в другой? если возможно, я хотел бы добавить их на дно, а не заменять элементы в другом списке.

Кодирование я использовать для перемещения определенных элементов является

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

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

Я не могу ответить на мой собственный вопрос по какой-то причине, но большое спасибо Heinzi, для кого-то с той же проблемой следующее кодирование должно помочь вам.

Dim SelectedItems = (от я в ListBox1.Items) .ToArray()

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

Answer 1

Вы можете использовать один и тот же код, но перебирать ListBox1.Items вместо 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