获得VB.NET的CheckBoxList的所有选择值 [英] Get all selected values of CheckBoxList in VB.NET

问题描述

我用ASP的的CheckBoxList 控制。现在，我要的是得到在VB code中的所有选择值。

I've used ASP's CheckBoxList control. Now what I want is to get the all selected values in VB code.

<asp:CheckBoxList ID="chkbxlst_Users" runat="server" RepeatColumns="2" RepeatDirection="Vertical" RepeatLayout="Table"></asp:CheckBoxList>

VB

Protected Sub btnSaveSetProject_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSaveSetProject.Click
        Dim ds_selectedProjects As New DataSet
        Dim eStr As String = String.Empty
        Try

        Catch ex As Exception
            Me.ShowErrorMessage(ex.Message, "...btnSaveSetProject")
        End Try
    End Sub

在此保存按钮的点击我想要得到的所有选定的项目中的数据值和文本。

On this Save button's click I want to get all the selected items' value and text in dataset.

推荐答案

您可以尝试以下code：

  Protected Sub btnSaveSetProject_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSaveSetProject.Click

    Dim ds_selectedProjects As New DataSet

    Dim dt = New DataTable()
    Dim dcName = New DataColumn("Name", GetType(String))
    dt.Columns.Add(dcName)

    Dim eStr As String = String.Empty
    Try
        For Each checkBox As CheckBox In chkbxlst_Users.Items
            If (checkBox.Checked = True) Then
                Dim dr As DataRow = dt.NewRow()
                dr("ID") = checkBox.Text
                dt.Rows.Add(dr)
            End If
        Next
        ds_selectedProjects.Tables.Add(dt)
    Catch ex As Exception
        'Me.ShowErrorMessage(ex.Message, "...btnSaveSetProject")
    End Try
End Sub

这篇关于获得VB.NET的CheckBoxList的所有选择值的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！