Pulsante mostra password

Hai un problema con Excel?

Nuova discussione

Pulsante mostra password
di beppexile data: 26/08/2016 09:15:45
Salve a tutti, sto personalizzando il mio lavoro creando una sezione dove è possibile accedere solo tramite password;
sto utilizzando una userform con una textbox per inserire la password e un pulsante per dare l'ok, ed ho implementato sulla textbox la proprietà PassworChar, per nascondere la digitazione della password;

tuttavia, siccome ho inserito anche la possibilità di cambiare la password, vorrei inserire un piccolo pulsante accanto alla textbox che solo nel momento che è premuto mi permetta di mostrare la password.

Ho provato con un If nel modo sottostante, ma senza riuscirci; qualcuno sa se si può fare?
Ho provato ad utilizzare altri eventi del tasto, ma senza riuscirci.
Private Sub CommandButton1_Click() If Tasto1.Value = True Then TextBox1.PasswordChar = "" ElseIf Tasto1.Value = False Then TextBox1.PasswordChar = "*" End If End Sub

di scossa data: 26/08/2016 10:19:01
Ciao,

cit.: "vorrei inserire un piccolo pulsante accanto alla textbox che solo nel momento che è premuto mi permetta di mostrare la password."

Prova ad usare i due eventi MouseDown e MouseUp.

scossa's web site

Se tu hai una mela, ed io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

Private Sub CommandButton1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.TextBox1.PasswordChar = ""
End Sub

Private Sub CommandButton1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.TextBox1.PasswordChar = "*"
End Sub

di beppexile data: 26/08/2016 11:13:32
Grande scossa!!!!
Avevo provato tutti gli eventi, ma questi 2 proprio non li avevo considerati!

Grazie

Vuoi Approfondire?