vb.net - 无法从我在 vb.net 中的选中列表框中输出

Question

我只是在学习 vb，在我的文本框中输出特定的选中项目时遇到了一些问题。我尝试了很多方法，但仍然无法找到正确的方法，也许我忘记了什么？

    Private Sub submitBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles submitBtn.Click
    Dim output As String
    Dim listOfProd As String
    listOfProd = ""


    output = "Selected Region: " + destination.Text + Environment.NewLine + "Seleted Place: " +
        places.SelectedItem + Environment.NewLine + "Accomodation: " +
        accomodation.Text + Environment.NewLine + "Products Selected: " + Environment.NewLine

    For i As Integer = 0 To products.Items.Count
        If products.Items(i) Is products.CheckedItems Then
            listOfProd = listOfProd + products.Items(i)

        End If
    Next

    output = output + listOfProd

    outputHere.Text = output

Answer 1

无需循环并确定选中哪些复选框列表项，只需使用CheckedItems集合，如下所示：

' Loop through only the items that are checked 
For Each itemChecked In products.CheckedItems
    ' Get the text of the selected item and append it to the output string
    listOfProd = listOfProd + itemChecked.ToString()
Next