How to display * for text in a form

I am trying to have the SSN in my employee database form display as asterisks. :confused:

Declare a string field and place your SSN number in that;

Dim strSSN as string
dim i as integer
...
...
...

strSSN = value from database

for i = 0 to len(strSSN) - 1
text1.text = text1.text & "*"
next

Put an * in the PasswordChar property of the textbox. Regardless of what is placed in the textbox, the only thing that will be displayed are astericks.

Hi man:

Try to use Text1.PasswordChar = "*"
this work perfectly