Discussion :

[peinture38]

Bonjour,

Je souhaite changer la couleur d'un label à chaque fois qu'on clique dessus (pour en faire une sorte de selecteur).

Au premier clic sur le label celui-ci devient vert, et si on reclic dessus il redevient noir, et ainsi de suite, si on reclic il devient vert, puis noir ...

Pour le premier changement de couleur je sais faire :

Code :

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

1
2
Private Sub Monlabel_Click(sender As Object, e As EventArgs) Handles lMonlabel.Click
Monlabel.forecolor = Green

Seulement je ne sais pas comment faire en sorte de le refaire devenir noir si je clique à nouveau dessus.


Est-il possible de faire ça sur VB ?
Je vous remercie par avance

[wallace1]

Bonsoir,

Code :

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

1
2
3
4
5
If label.forecolor = color.green then
Label.forecolor = color.black
Elseif label.forecolor = color.black then
Label.forecolor = color.green
End if

A+

[peinture38]

En effet, c'était vraiment très simple...

Merci beaucoup !!

[ProgElecT]

Salut

Je pense que la 2éme condition ElseIf n'est pas utile puisque si label.forecolor n'est pas color.green il est color.black donc il faut qu'il passe à color.green.

Code :

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

1
2
3
4
5
If label.forecolor = color.green then
   Label.forecolor = color.black
   Else
   Label.forecolor = color.green
End if