如何处理多个选中的项目并在msgbox中一个一个地循环显示

Question

我想从一个 CheckedListBox 中获取所有选中的项目，并将每个项目添加到一个变量中，例如 item1、item2 等

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    Dim item1 As String
    Dim item2 As String
    For i As Integer = 0 To CheckedListBox1.CheckedItems.Count - 1
        If i = 1 Then
            item1 = CheckedListBox1.CheckedItems(i)
            MsgBox(item1)
        ElseIf i > 1 Then
            item1 = CheckedListBox1.CheckedItems(i)
            item2 = CheckedListBox1.CheckedItems(i)
            MsgBox(item1 + item2)
        End If
    Next
End Sub

如何在 MsgBox 中显示所有选定的项目？

Answer 1

如果问题只是您不确定如何处理多个选中的项目，请使用 StringBuilder 而不是单个变量。

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    Dim sb As New StringBuilder()

    For i As Integer = 0 To CheckedListBox1.CheckedItems.Count - 1
        sb.AppendLine(CheckedListBox1.CheckedItems(i))
    Next

    MsgBox(sb.ToString())

End Sub

附带说明一下，不要使用 + 连接字符串，使用 & 运算符。

如何处理多个选中的项目并在msgbox中一个一个地循环显示

How to handle multiple checked items and display them on a loop one by one in a msgbox

vb.net

checkedlistbox