Hente de valgte fra CheckBoxList

Hej, jeg har dette lige stykke kode, som henter Items fra en listBox, og smider dem i en kommasepareret streng (strItems), og fjerne det sidste komma hvis der ikke er flere Items.

Jeg kan ikke få det til at virke, hvis jeg på samme måde vil samle de VALGTE værdier fra en CheckBoxList. Kun ALLE værdier i CheckBoxList'en.


Dim strItems as String = nothing
Dim li as ListItem

        For each li in LstBox.Items
            strItems = strItems & li.Text.tolower & ", "
        next
    If not strItems is nothing
        strItems = strItems.Remove(strItems.Length - 2, 1)
    end if
End Sub


Nogen der har et lille forslag?