G
Guest
Dear gurus,
I use the following code to open a form. Is it possible to hide with
asterisks (password input) what i type in the inputBox?
Thank you in advance
Function OpenFormWithInput()
Dim Msg As String
Dim Title As String
Dim Defvalue As String
Dim Answer As String
Msg = "Enter Password"
Title = "Password verification"
Defvalue = ""
Answer = InputBox(Msg, Title, Defvalue)
If Answer = "123" Then
DoCmd.RunMacro "M_OpenF_DataEntry"
Else
MsgBox "This is an incorrect Password... Try again!"
End If
End Function
I use the following code to open a form. Is it possible to hide with
asterisks (password input) what i type in the inputBox?
Thank you in advance
Function OpenFormWithInput()
Dim Msg As String
Dim Title As String
Dim Defvalue As String
Dim Answer As String
Msg = "Enter Password"
Title = "Password verification"
Defvalue = ""
Answer = InputBox(Msg, Title, Defvalue)
If Answer = "123" Then
DoCmd.RunMacro "M_OpenF_DataEntry"
Else
MsgBox "This is an incorrect Password... Try again!"
End If
End Function