Olá
tenho o seguinte código para abrir um form com senha, mas ao digitar mostra a senha em vez de colocar ******
Um bem hajam !
tenho o seguinte código para abrir um form com senha, mas ao digitar mostra a senha em vez de colocar ******
- Código:
Dim strResposta As String
strResposta = InputBox("Digite a Senha", "Senha Requerida", "", 1000, 1000)
If StrComp(strResposta, "Sousa", vbBinaryCompare) = 0 Then
DoCmd.Close
DoCmd.OpenForm "frm_2", acNormal
Else
MsgBox "Senha Divergente", vbCritical
DoCmd.CancelEvent
End If
Um bem hajam !