[Resolvido]Habilitar Botao se um campo estiver como escolha "Sim ou Nao"

Boa noite pessoal!
Estava aqui a tentar através do codigo de login ver se conseguia habilitar um botão, através de um "visto", ou seja, aqueles quadrados para se seleccionar.
Acontece que assim realmente nao sei como fazer...
Ha possibilidades de dar uma ajudinha?

(Se tiver o visto o botao fica habilitado, se nao tiver, nao fica habilitado )

Defina o botão de comando Activado=Não nas propriedades do botão

No evento Click
If seubotãovisto.value=-1 Then
Me.ComandoXX.Enable=True
End If

Nao estou a conseguir entender :S
Eu tenho assim....mas ta a dar erro no Value.

Private Sub Cmd3_Click()

If bloq.Value = -1 Then
Me.bloq.Visible = True
End If

Me.cmd4.Visible = False
Me.cmd4.SetFocus
Me.Cmd3.Visible = False
Me.SFID.Locked = False
Me.User.Locked = False
Me.Nome.Locked = False
Me.Estensao.Locked = False
Me.Password.Locked = False
Me.cmdPass.Enable = False

End Sub

Esquece...erro meu!
Nome do botaovisto errado :S

O evento click na caixa de verificação, certo!

Já está Vieira!
Não sei se posso utilizar o tópico, pois o assunto é capaz de ser um pouco diferente.
Tenho este codigo VB:
Private Sub BotaoAlterar_Click()

If Not IsNull(CaixaLogin) Then

If IsNull(CaixaSenha) Then
MsgBox "Informe senha atual!", vbExclamation, "Alterar Senha"
CaixaSenha.SetFocus
ElseIf IsNull(CaixaNovaSenha) Then
MsgBox "Informe a nova senha!", vbExclamation, "Alterar Senha"
CaixaNovaSenha.SetFocus
ElseIf IsNull(CaixaConfirmarSenha) Then
MsgBox "Confirme a nova senha!", vbExclamation, "Alterar Senha"
CaixaConfirmarSenha.SetFocus
ElseIf CaixaConfirmarSenha <> CaixaNovaSenha Then
MsgBox "Erro na confirmação da nova senha!", vbExclamation, "Alterar Senha"
CaixaConfirmarSenha.SetFocus
ElseIf Me.CaixaSenha.Value = DLookup("[Password]", "[Assistente]", "[User] = '" & Me.CaixaLogin & "'") Then
DoCmd.SetWarnings False
DoCmd.RunSQL "Update Assistente Set Password='" & CaixaNovaSenha & "' Where User='" & CaixaLogin & "'"
DoCmd.SetWarnings True
MsgBox "Senha alterada com sucesso!", vbInformation, "Alterar Senha"
DoCmd.Close
Else
MsgBox "Senha inválida!", vbExclamation, "Login"
End If

End If

End Sub

Este código é de alteração de Palavra Pass, que por sua vez foi bloqueada, e queria que ele quando fosse alterada esta pass Automaticamente passasse o Valor da Validação para "0".
Pode ser neste topico?
Obrigado

Melhor dar este tópico por encerrado e abra outro, por favor. É que para sistema de busca não convém ter assuntos diferentes no mesmo tópico, pois torna difícil a quem procurar localizar um assunto. Por outro lado estou encerrando o expediente por hoje no fórum e fica mais fácil outro colega ajudar.

Bom trabalho