Posez votre question Signaler

A propos des ComboBox... [Résolu]

Messages postés
33
Date d'inscription
mercredi 15 mars 2006
Statut
Membre
Dernière intervention
5 mars 2010
 - - Dernière réponse : cs_ghuysmans99
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
 - 7 juil. 2009 à 08:02
Visual Basic 6 Posez votre question Signaler
Bonsoir,


Voilà ma situation :

Au départ, dans une Form une ComboBox visible et une TextBox non visible + un bouton de commande.
Au moment de la sélection dans ma ComboBox d'un item (au nombre de 5 par exemple) j'aimerais pouvoir rendre visible ma TextBox sans passer par le bouton commande.Le bouton ne me servant que pour la suite pour valider la TextBox.

Quelle est la procédure à suivre.Soyez indulgent je débute.Merci.

Merci d'avance pour vos réponses et bonne soirée.

Cordialement.
Afficher la suite 

4 réponses

Meilleure réponse
Signaler Commenter la réponse de cs_ghuysmans99
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
 11
3
Merci
Re,

Private Sub Combo1_Click()
If Me.Combo1.ListIndex = 4 Then 'si on est sur le 5e élément (on part de 0)
 Me.Text1.Enabled = True
 Else
  Me.Text1.Enabled = False
End If
End Sub , ----
[../code.aspx?ID=41455 Syntax color by Renfield]

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 122 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_ghuysmans99
Signaler Commenter la réponse de cs_ghuysmans99
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
 11
0
Merci
Essaie un truc comme ceci (en changeant le nom des contrôles si nécessaire) :
Private Sub Combo1_Change()
If Me.Combo1.ListIndex = 4 Then 'si on est sur le 5e élément (on part de 0)
 Me.Text1.Visible = True
 Else
  Me.Text1.Visible = False
End If
End Sub<hr />, ----
[../code.aspx?ID=41455 Syntax color by Renfield]
Commenter la réponse de cs_ghuysmans99
Signaler Commenter la réponse de liocifer
Messages postés
33
Date d'inscription
mercredi 15 mars 2006
Statut
Membre
Dernière intervention
5 mars 2010
0
Merci
Re,

Merci à toi, ghuysmans99

Ton code fonctionne à merveille.

Private Sub Combo1_Click()
If Me.Combo1.ListIndex = 4 Then 'si on est sur le 5e élément (on part de 0)
Me.Text1.Visible = True
Else
Me.Text1.Visible = False
End If
End Sub

Bonne soirée et merci encore.

Cordialement.
Commenter la réponse de liocifer
Signaler Commenter la réponse de cs_ghuysmans99
Messages postés
3983
Date d'inscription
jeudi 14 juillet 2005
Statut
Membre
Dernière intervention
30 juin 2013
 11
0
Merci
Sur ce coup je me suis complètement emmélé les pinceaux ...
Commenter la réponse de cs_ghuysmans99
Répondre Posez votre question