vb.net如何从列表框中获取特定行并将其添加到其他列表框中

Question

我正在加载（比方说300）IP到listbox1，我期待的是将所有这些IP分成三个其他列表框。因此，这些列表框中的第一个获得100，第二个列表框获得另外100个，第三个列表框获得最后100个。

恩。 Listbox1包含项目A，B，C。这些项目被分开，以便Listbox2包含A，Listbox3包含B，Listbox4包含C.

Answer 1

我将listBox的.Count除以3，以找出每个列表框中有多少条目。然后我创建了三个循环，每个循环处理自己的listBox条目。我通过循环索引在listBox中输入值，方法是选择listBox1中的值，然后将所选值输入listBox2。

可能有一种更有效的方法，但这只是一种解决方案。

Dim numCount As Integer
numCount = listBox1.Items.Count
Dim perList As Integer = numCount / 3

For i As Integer = 0 To perList - 1
    listBox2.Items.Add(ListBox1.Items(i).ToString)
Next

For i As Integer = perList To perList * 2 - 1
    listBox3.Items.Add(ListBox1.Items(i).ToString)
Next

For i As Integer = perList * 2 To perList * 3 - 1
    listBox4.Items.Add(ListBox1.Items(i).ToString)
Next