password become star

[samm]

when I write a password , I like it become star

please amend this code:


Private Sub Form_Open(Cancel As Integer)
If InputBox("Enter you Password", "For conformation") <> "aaafffjjj" Then
DoCmd.CancelEvent
MsgBox " Error passport", 64, "For Conformation"
Else
DoCmd.OpenForm "Fphone"
End If

End Sub

 

[Jack Cowley]

Instead of using the InputBox use a popup form of your design and set the Input Mask property for the text box to Password.

Jack

 

[samm]

hi Jack
thank you so much

can you explain more

 

[Jack Cowley]

There is really not much more to explain. Just make a small form with an unbound field and set the fields Input Mask to Password. Add a command button to open the next form, or whatever you want to do, and in the command button use code to see if the password is correct and then continue accordingly. Set the forms Popup property to Yes if it is appropriate for the form be a popup.

Jack

 

[samm]

thank you so much

can you explain how I set the fields Input Mask to Password?

 

[Jack Cowley]

Type Password into the Input Mask property...

Jack