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
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
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
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
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
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