Discussion :

[Hervé37]

Bonjour

j'ai un programme ou je change la couleur du label lorsque je rentre dans une textbox celle-ci deviens verte, j’aimerai que une fois que je par sur une autre zone la couleur redevienne noir, qui a la solution?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub TextBox1_Enter()
Label1.ForeColor = &HC000&
End Sub

Private Sub TextBox1_Exit()
Label4.ForeColor = &H0&
End Sub

1er partie fonctionne mais forcément pas la 2eme
merci d'avance

[edelweisseric]

Bonjour à tous
Bonjour Hervé37

Tu peux essayer en mettant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Label1.ForeColor = &H0&
End Sub

Eric

[Hervé37]

Merci edelweisseric
cela répond a ma question, je ne suis pas bien douer avec c'est zone entre parenthèse tel que (ByVal Cancel As MSForms.ReturnBoolean) je ne comprend même pas vraiment sont sens serai tu ou je pourrais trouver des infos sur cette partir de programmation et le nom de cette parti d'instruction?

[edelweisseric]

Bonjour à tous
Bonjour Hervé37

Le problème venait surtout du "Label1" qui s'était transformé en "Label4".

Tu trouveras beaucoup de renseignements dans :
- la F.A.Q.
- Tutoriels
- Sources
- Outils
Lis ces excellants outils et tu apprendras beaucoup de choses. Je ne manque jamais de m'y repporter.
Désolé, mais je n'ai pas le temps de les parcourir, pour l'instant, afin de te donner l'endroit (le lien) exact.

Eric

[Hervé37]

ok merci non pour le label c'été juste l'exemple mais en éffet j'ai fais une érreur dans sont écriture, aprés mon souci été bien le (ByVal Cancel As MSForms.ReturnBoolean) que je ne sais pas utiliser