Visual Basic - AYUDA!!!!!

necesito saber com hago para traer de mi BD el valor de un CheckBox, porque cuando lo busco con el Objeto.Value me dice que no coinciden los tipos de datos y cuando lo busco por Objeto.Caption me trae es un valor Verdadero o Falso, y yo lo que quiero es que me aparezca el Check en la casilla.

if valor=true then
check1.value=vbchecked
end if