Permissoes e nivel de acesso

Meus amigos boa tarde, pesquisei aqui no forum sobre permissoes de usuarios e vi bons exemplos como do mestre avelino, mestre Harysohn.

Tenho uma tabela de permissoes e outra de Usuarios ambas relacionadas. fiz um formPermissoes neste formulario tenho caixas de Sim/Não acopladas das tabelas permissoes e usuarios.

Pergunta: Como fazer para que ao selecionar uma caixa Sim/Nao por exemplo a caixa de Clientes. o usuario não ter o acesso ao cliente?

Se alguem puder me mostrar como inciar o codigo para este fim eu agradeço muito.

Meus amigos estou verificando um exemplo atraves do mestre JPaulo


Dim Identificacao As Integer

If Me.txtSenha.Value = DLookup("[Senha]", "[TBLUsers]", "[User] = '" & Me.txtUser & "'") Then
Identificacao = DLookup("[NivelSeguranca]", "[TBLUsers]", "[User] = '" & Me.txtUser & "'")
Select Case Identificacao
Case 1
stDocName = "frmAdministrador"
Case 2
stDocName = "frmUsuario"
End Select
DoCmd.Close
DoCmd.OpenForm stDocName
Else
MsgBox "Senha Incorreta, coloque novamente.", vbInformation + vbOKOnly, "Erro"
Me.txtSenha.Value = ""
Exit Sub
End If


Minha duvida é Como fazer para alterar a senha?