CheckBox / Case à cocher [Résolu]

Messages postés
95
Date d'inscription
lundi 27 mars 2006
Statut
Membre
Dernière intervention
28 août 2015
- - Dernière réponse : cs_franckydeluka
Messages postés
228
Date d'inscription
mardi 5 avril 2005
Statut
Membre
Dernière intervention
4 janvier 2008
- 1 juin 2006 à 16:01
Bonjour,
Voila, je souhaite ajouter une valeur dans une textebox lorsque je coche ma case à cocher. De plus, la valeur entrée doit être protégée/
La ligne de commande que j'utilise et qui fonctionne est la suivante :

Private Sub CheckBox1_Click()
If CheckBox1.Enabled = True Then
TextBox1.Value = "TEST"
TextBox1.Locked = True
Else
TextBox1.Value = ""


End If

Mon problème : Si je décide de décocher ma case à cocher, la valeur entrée, ici "TEST" , est conservée alors que je souhaiteria qu'elle disparaisse !
Avez-vous une idée
Merci
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Messages postés
42
Date d'inscription
vendredi 10 octobre 2003
Statut
Membre
Dernière intervention
21 juin 2006
3
Merci
Bonjour, remplace enabled par value.

Dire « Merci » 3

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

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

Commenter la réponse de Alboure
Messages postés
228
Date d'inscription
mardi 5 avril 2005
Statut
Membre
Dernière intervention
4 janvier 2008
1
0
Merci
Salut

Voici ton code :

If CheckBox1.Value = 1 Then
    TextBox1.Text = "TEST"
    TextBox1.Locked = True
Else
    TextBox1.Text = ""
    TextBox1.Locked = False
End If




Bonne prog







Deluka.
Commenter la réponse de cs_franckydeluka