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

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

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

Код, который я использую для перемещения определенных элементов,

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

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

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

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

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

vb.net vb.net-2010
person JackSparrow    schedule 27.05.2012    source источник
comment
Поскольку вы не можете ответить на свой вопрос, я переместил свой комментарий в ответ, чтобы вы могли его пометить (и, таким образом, пометить этот вопрос как отвеченный).   -  person Heinzi    schedule 28.05.2012

Ответы (2)


arrow_upward
2
arrow_downward

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

arrow_upward
0
arrow_downward

Попробуйте это, чтобы переместить все предметы - сработало на 100%

For Each item As String In ListBox1.Items
            ListBox2.Items.Add(item.ToString)
        Next
person Hedi    schedule 09.01.2021