vb.net 如何将第一个未选择的元素从 listBox 复制到另一个

Question

我需要代码来帮助我将第一个未选择的元素从一个列表框复制到另一个列表框，我已经知道如何复制所有未选择的元素，如下所示，但我只需要从 lisbox 复制第一个 Elemnet：

                For i As Integer = 0 To ListBox3.Items.Count - 1
                    If ListBox3.GetSelected(i) Then
                        ListBox1.Items.Add(ListBox3.Items(i))
                    Else
                        ListBox1.Items.Add(ListBox3.Items(i))
                    End If
                Next

谢谢

Answer 1

你可以试试这个方法。它会复制所有未选择的，但很容易修改为只复制第一个找到的。

Private Sub CopyUnselectedButton_Click(sender As Object, e As EventArgs) Handles CopyUnselectedButton.Click

    For iterator As Integer = 0 To SourceListBox.Items.Count - 1

        Dim item As Object = SourceListBox.Items(iterator)

        If Not SourceListBox.SelectedItems.Contains(item) Then
            DestListBox.Items.Add(SourceListBox.Items(iterator))
            Exit For
        End If

    Next

End Sub

vb.net 如何将第一个未选择的元素从 listBox 复制到另一个

How to copy the first Unselected element from a listBox to another in vb.net

vb.net