Validation automatique d'un textbox

Bonjour à toutes et à tous,

Je bute actuellement sur la validation d'un textbox.

En cliquant dans le formulaire USF, un formulaire PASSWORD apparait ne contenant qu'un textbox (TB).

Ce dernier est utilisé pour valider un mot de passe de 8 caractères sans devoir cliquer sur un bouton ou valider avec entrée.

Si le MDP est correct => fermeture formulaire PASSWORD et ouverture formulaire USF_ADMIN.

Si le MDP est incorrect => fermeture formulaire PASSWORD et ouverture formulaire USF (principal).

Lorsque le MDP est mauvais, je me retrouve tout logiquement sur le USF principal. De là, je souhaite à nouveau accéder au formulaire PASSWORD afin de pouvoir accéder au formulaire USF_ADMIN. Lorsque j'encode un MDP quel qu'il soit, le textbox ne réagit plus lorsque les 8 caractères (bons ou mauvais) ont été encodés.

J'espère avoir été clair dans mes explications

Voici le code :

Private Sub TB_Change()

If Len(Me.TB.Text) = 8 Then

If Me.TB.Value = "00000000" Then

Me.Hide

Unload Me

USF_ADMIN.Show

Else

Me.Hide

Unload Me

USF.Show

End If

End If

End Sub

Private Sub UserForm_Initialize()

Me.TB.Value = ""

Me.TB.MaxLength = 8

Me.TB.PasswordChar = "*"

End Sub

Un tout grand merci à l'équipe

Bonjour,

Et en faisant un Repaint ?

Me.Repaint

Theze a écrit :

Bonjour,

Et en faisant un Repaint ?

Me.Repaint

Apparemment non