如何獲取vb.net中選定復選框的所有值並將其設置在字符串列表中

Question

我需要在復選框上獲取選中的項目，並從我選中的復選框設置為字符串格式，例如（value1，value2，value3）

For Each row As GridViewRow In GridView1.Rows    
    If row.RowType = DataControlRowType.DataRow Then
        Dim CheckRow As CheckBox = (TryCast(row.Cells(1).FindControl("chckSelector"), CheckBox))

        If CheckRow.Checked Then
            Dim scode As String = TryCast(row.Cells(2).FindControl("lblsstorecode"), Label).Text
            lbltest.Text = 'this i want to get the value like this (value1,value2,value3) from checkbox that i selected                
        End If
    End If
Next

Answer 1

根據使用GridView控件的原因，也許我可以通過使用CheckBoxList來更輕松地完成此操作。 在Asp.net中，使用CheckBoxList可以很容易地實現您所描述的內容，如下所示：

在.aspx中：

<asp:CheckBoxList ID="Itemlst" runat="server" RepeatColumns="1">
    <asp:ListItem Value="">Item 1</asp:ListItem>
    <asp:ListItem Value="">Item 2</asp:ListItem>
    <asp:ListItem Value="">Item 3</asp:ListItem>
</asp:CheckBoxList>

</br>
<asp:Button ID="Button1" runat="server" Text="Button" />
</br>
<asp:TextBox ID="TextBox1" runat="server" Width="400"></asp:TextBox>

然后在后面的代碼中：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim selected = New List(Of ListItem)
    Dim itemcount As Integer
    Dim csvlist As String = ""
    For Each item As ListItem In Itemlst.Items
        If item.Selected Then selected.Add(item)
    Next

    itemcount = selected.Count
    For i = 0 To itemcount - 1
        csvlist = csvlist & selected(i).ToString & ","
    Next
    csvlist = Mid(csvlist, 1, Len(csvlist) - 1)
    TextBox1.Text = csvlist
End Sub

如果您正在開發桌面應用程序，則Windows Forms CheckedListBox可能會工作類似。