scusatemi, non riesco a far apparire in una text i caratteri *** al posto delle parole, io ho scritto in questa maniera:
Private Sub Command1_Click()
Text1.PasswordChar = "*"
If Text1.PasswordChar = "ciao" Then
Form1.Show: Unload Me
Else
MsgBox "Password errata, riprova nuovamente"
End If
End Sub
se ci sono errori ditemelo...grazie
ciao
|