textboxRésolu

Question

Comment r&#233;cup&#232;re t'on,dans une textbox, la valeur saisie par l'op&#233;rateur apr&#232;s qu'on lui est demand&#233; .

econs · Accepted Answer

Text1.Text 



(si la textbox s'appelle Text1)

Manu
-------------------------------------------
Une question bien pos&#233;e, c'est une chance de r&#233;ponse bien adapt&#233;e.

cs_toods · Answer

textbox.text
voil&#224;

Plus tu vas moins vite, moins tu vas plus loin

econs · Answer

Oups .. pas compris le probl&#232;me en premi&#232;re lecture ....



Si tu as demand&#233; &#224; l'utilisateur de rentrer quelquechose avec l'InputBox (si ce n'est pas le cas, pr&#233;cises-le) :







dim result As String



result = InputBox("Entrez quelquechose")

Text1.Text = result

Manu
-------------------------------------------
Une question bien pos&#233;e, c'est une chance de r&#233;ponse bien adapt&#233;e.

cs_franckydeluka · Answer

si jamais utilises une inputbox :

Dim essai
    essai = InputBox("veuillez entrer votre message : ")
    MsgBox (essai)



Deluka.

bierataise · Answer

Merci &#224; vous.Je lui demande d'entrer un code et je veux r&#233;cuperer cette saisie.

diablamanshadow · Answer

bah :
public mdp as interger 'si ses un chiffre ou
public mdp as string ' si le passe est en lettres
______________________________
mdp = "123456" 'ou
mdp = "arf"
if text1.text = mdp then
form2.show 'enfin tu met se que fais ton prog si le pass est bon
else
msgbox "le password est incorrect"
end if
_______________
voila pas compliquer ;)

bierataise · Answer

C'est sur que &#231;a simplifie tout.
Que signifie form2.show?

cs_toods · Answer

affiche la form tout simplement

Plus tu vas moins vite, moins tu vas plus loin

bierataise · Answer

Voici ou il y a un soucis:

Private Sub TextBox1_Change()
    textMotDePasse = "tortue"
    If TextBox1.Text = textMotDePasse Then MsgBox "Mot de passe valide"
      ElseIf (TextBox1.Text <> textMotDePasse) Then
        MsgBox "Echec de la saisie du mot de passe" & vbCr & _
               "La commande ne peut etre &#233;xecut&#233;e", vbExclamation, _
               "Mot de passe incorrect"
           If TextBox1.Text = textMotDePasse Then
            Unload UserForm4
            Load UserForm3
        End If
    End If
  If textMotDePasse.Value = "" Then
 MsgBox textMotDePasse.Value & "Vous devez entrer une valeur dans la zone de texte", vbExclamation, "Valeur requise"
Else
Me.Hide
End If
End Sub
End Sub

Voici ce que m'affiche le debogeur: erreur de compilation Else sans if.


Si qq1 &#224; une id&#233;e merci de me la faire parvenir

cs_toods · Answer

essaye comme ca:
Private Sub TextBox1_Change()
    textMotDePasse = "tortue"
    If TextBox1.Text = textMotDePasse Then 
      MsgBox "Mot de passe valide"         ' ICI UN RETOUR CHARRIOT
      ElseIf (TextBox1.Text <> textMotDePasse) Then
        MsgBox "Echec de la saisie du mot de passe" & vbCr & _
               "La commande ne peut etre &#233;xecut&#233;e", vbExclamation, _
               "Mot de passe incorrect"
           If TextBox1.Text = textMotDePasse Then
            Unload UserForm4
            Load UserForm3
        End If
    End If
  If textMotDePasse.Value = "" Then
 MsgBox textMotDePasse.Value & "Vous devez entrer une valeur dans la zone de texte", vbExclamation, "Valeur requise"
Else
Me.Hide
End If
End Sub

En vb, si tu fais If ... then ....
                           Else ...
                           End if
il indique else sans if car pour lui le if s'arrete &#224; If ... Then ....
Il faut &#233;crire If .... Then 'RETOUR A LA LIGNE
                        ......
                     Else .....
                  End If
Plus tu vas moins vite, moins tu vas plus loin

bierataise · Answer

Mortel &#231;a passe &#224; la compilation mais il demeure un probl&#232;me certes pas existentiel mais  pas loin car il me test le mot de passe des la premi&#232;re lettre et il ne me laisse pas l'occasion d'aller plus loin alors je vais essayer avec les len ou carr&#233;ment comme l'on propos&#233; certains d'essayer que (je remerci au passage) avec une inputBox.

cs_toods · Answer

juste une question. Dans ta textbox o&#249; tu saisie ton mdp, pourquoi tu fais le test &#224; ce moment. Comme dans toute connection, tu saisie ton login, ton mdp et tu clic sur un bouton. Et c'est &#224; ce moment que tu fais tes tests. c'est plus simple non ?
ou bien as tu une raison dans tester ton mdp en cours de saisie de celui ci?

Plus tu vas moins vite, moins tu vas plus loin

bierataise · Answer

J'ai voulu aller trop vite je crois.
L&#224; tu me donnes une bonne piste car effectivement il est plus logique que lorsque je valide la saisie alors &#224; ce moment l&#224; je test le login. Carr&#233;ment.

Textbox

13 réponses

Discussions similaires