如何将3个列表框项目添加到一个列表框中

Question

我正在使用vb.net表单。

我有3个列表框，每个包含许多项（listbox1，listbox2，listbox3）和另一个空的列表框（listbox4），我试图将前三个列表框项添加到第四个列表框

例如：）listbox1的第一项是'A'，listbox2的第一项是'b'，listbox3的第一项是'c'现在listbox4的第一项必须是“ Abc”

问题是我不上班，但要保持循环。 这是我的代码：

For i = 1 To ListBox1.Items.Count - 1

       For j = i To ListBox2.Items.Count - 1

           For k = j To ListBox3.Items.Count - 1

               ListBox4.Items.Add(ListBox1.Items(j).ToString + ListBox2.Items(j).ToString + ListBox3.Items(k).ToString)

               Exit For
           Next
       Next
   Next

Answer 1

您已经嵌套了循环。 这意味着内循环在外循环的每个循环处重复。 例如，如果三个列表框具有3、4和6个元素，则最内部的循环将循环3 x 4 x 6 = 72次！

而是只做一个循环：

Dim n As Integer = _
    Math.Min(ListBox1.Items.Count, Math.Min(ListBox2.Items.Count, ListBox3.Items.Count))

For i As Integer = 0 To n - 1
    ListBox4.Items.Add( _
        ListBox1.Items(i).ToString + _
        ListBox2.Items(i).ToString + _
        ListBox3.Items(i).ToString)
Next