[VB6] Visualizzare asterischi al posto delle stringhe in una TextBox

[Stefano1984Mn]

Private Sub Text1_Change()
Text1.PasswordChar = "*"
End Sub