A voir également:
- Programmation vb
- Application de programmation - Guide
- Programmation vb - Télécharger - Langages
- Vb audio cable - Télécharger - Audio & Musique
- Programmation envoi sms - Guide
- Vb editor - Télécharger - Langages
5 réponses
Bonjour
Il faut générer le code par un événement valide;
Command1_Click()
if text1="mot de passe" then
form2.show()
end if
end sub
Il faut générer le code par un événement valide;
Command1_Click()
if text1="mot de passe" then
form2.show()
end if
end sub
bonjour ,
si c'est possible tu peut m'envoyer le genre d'erreur qui se declanche l'ors de l'execution de ce code.
si c'est possible tu peut m'envoyer le genre d'erreur qui se declanche l'ors de l'execution de ce code.
Bsr
j'espere que je ne viens pas deranger la communauté. ben si je ne sort pas trop du sujet voilà ce que moi je propose de faire
1. ici nous avons 2 feuilles form1 et form2 et deux butons cmdEntrer qui permet d'ouvrir form2 et cmdQuitter qui permet de sortir de m'application.
au debut j'initialise mon bouton entrer à enabled=false soit (cmdEntrer.Enabled=false) pour le desactivé par defaut et là dans l'evenement change de la zone de texte Text1 j'applique ce que tu as dit. ben treve de bavardage voilà ce que j'obtient
lorsque je tappe "william" dans la zone de texte automatiquement le bouton entrer s'active et execute en meme temps le code qui se trouve dans la procedure cmdEntrer_click
je ne sais pas si c'est ce donc vous avez besoin mais c'est ma façon de compredre ce que vous avez dit. faites moi signe si je me trompe.
cdlt.
j'espere que je ne viens pas deranger la communauté. ben si je ne sort pas trop du sujet voilà ce que moi je propose de faire
1. ici nous avons 2 feuilles form1 et form2 et deux butons cmdEntrer qui permet d'ouvrir form2 et cmdQuitter qui permet de sortir de m'application.
au debut j'initialise mon bouton entrer à enabled=false soit (cmdEntrer.Enabled=false) pour le desactivé par defaut et là dans l'evenement change de la zone de texte Text1 j'applique ce que tu as dit. ben treve de bavardage voilà ce que j'obtient
Option Explicit
Dim motPasse As String
Private Sub cmdEntrer_Click()
Form2.Show
End Sub
Private Sub cmdQuitter_Click()
End
End Sub
Private Sub Text1_Change()
motPasse = "william"
If Text1.Text <> motPasse Then
cmdEntrer.Enabled = False
Else
cmdEntrer.Enabled = True
cmdEntrer_Click
End If
End Sub
lorsque je tappe "william" dans la zone de texte automatiquement le bouton entrer s'active et execute en meme temps le code qui se trouve dans la procedure cmdEntrer_click
je ne sais pas si c'est ce donc vous avez besoin mais c'est ma façon de compredre ce que vous avez dit. faites moi signe si je me trompe.
cdlt.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
voilà le code que j'ai introduit et ça pas marché:
Private Sub Text1_Change()
If Text1 = " greenday" Then
Command1_Click()
Form2.Show
End Sub
Private Sub Command2_Click()
End
End Sub
avec command11 est entrer et command2 et quitter.
Merci de m'aider svp!