Cargar Valor de un CheckBox en BD Access

[vbx3m]

Es sencillo, lo que debes hacer es comparar el valor del campo ya que directamente no se lo puedes asignar debido a que el Check tiene valores 0(Uncheked), 1(Cheked), 2(Grayed) y no Verdadero/Falso, Si/No, Activado/Desactivado... Para guardar debes hacer lo mismo pero a la inversa comparar el valor del Checkbox y guardar en la DB el valor True o False... aqui te dejo un ejemplo:

Para mostrar:

If !Activo = True Then
OptActivo.Value = 1
Else
OptActivo.Value = 0
End If

Para guardar:

If OptActivo.Value = 1 Then
!Activo = True
Else
!Activo = False
End If

Espero haberte ayudado...