como mostrar / editar check box? II parte

[principefreddy]

hola. se me hizo imposible conectarme sino hasta hoy. los codigos que utilizo para guardar los check en la base de datos son los siguientes:

rs!honor = HonorMerito.Value
rs!E_Policial = E_Policial.Value
rs!Diciplina = Diciplina.Value
rs!E_Trabajo = Espiritu.Value

esos datos se los muestra en un MSHFlexigrid. donde al darle doble click me llama una consulta que la pondre abajo.. para si cargar los datos a otro formulario. la consulta tiene esto:

rs.Open "SELECT * FROM chicas WHERE codigo = " & iCodigo, nc, adOpenDynamic, adLockOptimistic
While Not rs.EOF

frmEdit.lbCedula.Text = rs!cedula
frmEdit.lbNombre.Text = rs!NOMBRE
frmEdit.lbApellido.Text = rs!apellido
frmEdit.lbFecha.Text = rs!fechaingreso
' de aqui para abajo es donde trato de cargar los check
'frmEdit.Check1.Value = True 'rs!E_Trabajo
'frmEdit.Check2.Value = rs!honor
'frmEdit.Check3.Value = rs!Diciplina
'frmEdit.Check4.Value = rs!E_Policial

*)el problema me lo muestra en cada linea de codigo que intento llamar al check.

espero me ayuden. y me digan como poder modificarlos.