Boa tarde à todos os mestres do access;
Galera tenho uma inputBox onde gostaria de utilizar uma máscara "senha" nos dados digitados dentro dela, alguém sabe como eu poderia fazer isso?
Dim strInput As String
strInput = InputBox("Digite sua senha", "Acesso Restrito")
If strInput = "" Or strInput = Empty Then
MsgBox "Senha não informada", vbCritical, "Validação de dados"
Exit Sub
End If
If strInput = "123456" Then
DoCmd.OpenForm "Painel_Control", acNormal, , , acFormEdit
Else
MsgBox ("Senha incorreta"), vbCritical, "Validação de dados"
Exit Sub
End If
Saudações
Davi
Galera tenho uma inputBox onde gostaria de utilizar uma máscara "senha" nos dados digitados dentro dela, alguém sabe como eu poderia fazer isso?
Dim strInput As String
strInput = InputBox("Digite sua senha", "Acesso Restrito")
If strInput = "" Or strInput = Empty Then
MsgBox "Senha não informada", vbCritical, "Validação de dados"
Exit Sub
End If
If strInput = "123456" Then
DoCmd.OpenForm "Painel_Control", acNormal, , , acFormEdit
Else
MsgBox ("Senha incorreta"), vbCritical, "Validação de dados"
Exit Sub
End If
Saudações
Davi