convert typed password to "*" 2

[chilly442]

Users must enter a password to get to an entry form. Is there a way to convert the typed text into "*"? The way it is now, someone could see the typed password.

Here is the code that I am using to prompt for the password:
Private Sub cmdFrontRangeData_Click()
Dim password As String
ReturnUserName
password = InputBox("Enter Password " & vbNewLine & vbNewLine & " " & ReturnUserName())
If password <> "123" Then
GoTo last
Else
Sheets("Data").Activate
SelectionScreen.Show
End If
last:
Sheets("Report").Activate
Unload Me
End Sub
Any help will get you a star!!

Chilly442

 

[SkipVought]

Check out the password property of the textbox object.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[SkipVought]

Actually, it's the PasswordChar property.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[PHV]

Usse a TextBox with its PasswordChar property set to "*".

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[chilly442]

Thanks guys. I knew that I had seen how to do this somewhere, just wasn't sure where.

Chilly442