enregistrer le mot de passe

J'ai un soucis, mon mot de passe ne fonctionne pas c'est à dire que quelque soit le mot de passe que je rentre il me renvoit le message d'erreur. Si quelqu'un peut m'aider je ne vois pas comment faire.Merci Option Explicit Dim txtPassword as string Dim compilation as string Public LoginSucceeded as boolean Private Sub Confirmer_Click() ' Vérifie si le mot de passe est correct If txtPassword="chien" then 'placer le code ici pour signaler à la procédure appelante la réussite de la fonction LoginSucceeded =True Me.Hide Else MsgBox"Mot de passe non valide,réessayer!",,"Connexion" SendKeys"{Home}+{End}" End if End sub Private Sub Quitter_Click() 'Affecte la valeur faux à la variable globale pour indiquer l'echec de la connection LoginSucceeded =false

Me.Hide
End Sub

salut

alors sa me semble normal tu vois tu a déclarée une variable que tu ne touche jamais dans ton code txtPassword  = 0 car tu ne lui donne jamais de valeur tu devrai enlever la déclaration apeller ta text boxe txtPassword sa devrai marcher aprés tu poura modifier mais le principe est la
aller a+
simon22

enleve les dim & rajoute des textbox

@+

E.B.

ou affecte la valeur saisie par ton user dans la textbox a ta variable avant de la tester!!
tatextebox.text = txtpassword
Meme si c ridicule et qu'il est logique de directement tester la valeur de la textbox