VB.net Populate CHECKBOXLIST

Hello to all...
I've a little problem when I try to selected my checkbox list with the retrieve data from sql DB.

I've a checkbox list, created with an objectdatasource in asp.net
then in the code behind (vb.net) I try to select, the item in the checkboxlist with the Id's coming from the DB.
with this code nothing nothing happen. I know the problem is in the "for each" line, but I dont know how to define the code to look trought my items and then populate.

I tried in the checkboxlist databinding and in the page_load event
Thanks for any help

Here is my code

        ponentesAsignados = New DataSetTableAdapters.ponentesAsignadosTableAdapter
        Dim ponentesAsignados_data As DataSet.ponentesAsignadosDataTable = ponentesAsignados.SelectByProId(proId)
        If ponentesAsignados_data.Count > 0 Then

            For Each l As ListItem In ponModId.Items
                If l.Value = ponentesAsignados_data(0).ponId.ToString() Then
                    l.Selected = True
                End If
            Next
        End If

ponentesAsignados = New DataSetTableAdapters.ponentesAsignadosTableAdapter
        Dim ponentesAsignados_data As DataSet.ponentesAsignadosDataTable = ponentesAsignados.SelectByProId(proId)
        If ponentesAsignados_data.Count > 0 Then 
            For Each l As ListItem In ponModId.Items
                If l.Value = ponentesAsignados_data(0).ponId.ToString() Then
                    l.Selected = True
                End If
            Next
        End If

Select allOpen in new window