[Resolvido]Digitar senha no campo funcionário e apareça o nome do funcionário.

Bom dia a todos do forum

Tenho um formulário alunos com um subformulário de pagamentos, gostaria que o funcionário em vez de selecionar o seu nome digitasse sua senha e aparecesse o seu nome.

Agradeço a quem poder me ajudar

Olá, seja bem bem vindo ao forum! Tente, no evento "Após atualizar" do campo da senha:

If IsNull(DLookup("Senha", "NomeDaTabela", "Senha='" & Me.CampoSenhaDoForm & "'") Then
MsgBox "Senha incorreta.", vbCritical, "Erro"
Else
Me.CampoUserDoForm = DLookup("Usuário", "NomeDaTabela", "Senha='" & Me.CampoSenhaDoForm & "'")
End If

Mas veja bem que, caso dois usuários tenham coincidentemente colocado a mesma senha, isso poderá dar problemas. Por isso o mais usual é fazer o contrário, ou seja, digitar o nome do usuário.

Boa tarde!

criquio obrigado pela resposta

Quanto a senha elas não se repetem, mas no meu subformulário so tem uma caixa de combinação onde se escolhe o funcionário que esta recebendo. Como faço para colocar o código.

Então não entendi bem a questão. Para que quer digitar a senha se tem o combo com o nome da pessoa? Ou será que você quer escolher a pessoa e tambem digitar a senha? Se for, seria algo assim, no clique de um botão:

If Me.CampoSenha <> DLookup("Senha", "Tabela", "Usuário='" & Me.NomeCombo.Value & "'") Then
MsgBox "Senha incorreta", vbCritical, "Erro"
Else
...
End if

Bom dia!

criquio obrigado pela atenção.

Estou tentando atraves de uma macro colocar o nome do funcionário em um compo do pagamento chamado QuemRecebeu

Isso ta um pouco confuso.. primeiro falou de form, agora tem tambem um sub form... decreva co clareza de detalhes todo o processo que pretende.


Cumprimentos

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.