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

Question

我正在将IP（例如300个）加载到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