获取checkboxlist多选值

'获取checkboxlist多选值
    Public Function Check_Clicked(ByVal sender As [Object], ByVal e As EventArgs) As String

        Dim cklValue As String = ""

        ' Iterate through the Items collection of the CheckBoxList
        ' control and display the selected items.
        Dim i As Integer = 0
        While i < cblSoftWarePlatform.Items.Count

            If cblSoftWarePlatform.Items(i).Selected Then


                cklValue += cblSoftWarePlatform.Items(i).Text + "/"

            End If
            i = i + 1
        End While

        Return cklValue

    End Function

posted @ 2010-11-26 14:42  草根站长李小冲  阅读(303)  评论(0编辑  收藏  举报