Mostar valores

Boas Pessoal,

Tenho a seguinte duvida, eu ao registar um cliente no programa posso defenir se é administrador ou convidado atraves de uma Check em que o cliente da um click e na Base de Dados coloca como administrador.

a minha duvida é que quando eu vou as propriedades do cliente para colocar como convidado nao me aparece a Check marcada com um visto, ou seja, guarda na base de dados mas nao mostra no software:

O codigo que uso para ir a base de dados buscar os dados é o seguinte:

Check1 = CStr(Registos.Fields.Item("adm").Value)

e ao executar o programa da erro nessa linha....

Se alguem me poder ajudar fico muito agradecido,

Obrigado,