Consulta sobre checkbox

[Melunina]

Holap... muchas gracias por responder... pero aún no entiendo!!! Te explico mejor...

Yo creo las casillas "cheks" por medio de código... queda asi:

Código:

 Public Sub CrearCasillas()
        Dim ds As DataSet
        Dim Top As Integer
        Top = 270
        ds = oAlumno.ObtenerServicios

        For Each Item As DataRow In ds.Tables("Servicios").Rows
            Dim oBoton As New CheckBox
            oBoton.Text = Item.Item("Descripcion")
            oBoton.Tag = Item.Item("Id_servicio")
            oBoton.Name = "opt" & oBoton.Tag
            oBoton.Top = Top
            oBoton.Left = 81
            oBoton.AutoSize = True

            AddHandler oBoton.Click, AddressOf oBoton_OnClick
            Me.Controls.Add(oBoton)
            Top = Top + 25
        Next
    End Sub

Me lista X servicios... Despues los recorro para guardarlos en la BD:

Código:

Dim Control As Control
            Dim oBoton As CheckBox

            For Each Control In Me.Controls
                If TypeOf Control Is System.Windows.Forms.CheckBox Then
                    oBoton = Control
                    If oBoton.Checked = True Then
                        oAlumno.oOpcion = oBoton.Tag
                        oAlumno.CargarServicios()
                    End If
                End If
            Next Control

Me guarda todos los que MARQUE...

Ahora mi duda es levantar de la BD los servicios que se guardaron y mostrarlos en los checks!!! NO TENGO LA MENOR IDEA DE COMO HACERLO JA!!!!

Saludosssss!!!!