1

これが以前に回答されている場合は申し訳ありませんが、サイトを検索したところ、私の質問に回答するものが見つかりませんでした.

選択した項目をリストボックス間で移動できますが、あるリストボックスからすべての項目を移動して別のリストボックスに追加するにはどうすればよいですか? 可能であれば、他のリストボックスの項目を置き換えるのではなく、それらを一番下に追加したいと思います。

特定のアイテムを移動するために使用するコーディングは

 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 = (From i In ListBox1.Items).ToArray()

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

2 に答える 2

2

同じコードを使用できますが、ListBox1.SelectedItems の代わりに ListBox1.Items を反復処理します。

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
于 2012-05-27T22:55:03.780 に答える
0

これを試してすべてのアイテムを移動してください - 100% 動作しました

For Each item As String In ListBox1.Items
            ListBox2.Items.Add(item.ToString)
        Next
于 2021-01-09T16:56:31.933 に答える