Discussion :

[Mélodie_et_rythmes]

Re bonjour,
Je cherche à faire un truc tout bête mais je n'y arrive pas...

Au fait, j'ai sur ma form des checkboxes.
Je veux que lorsque qu'un utilisateur clique sur une checkbox, VB détecte si elle était cochée ou pas au moment du click.
Si elle était cochée il exécuter une portion du code donnée, sinon il en exécute une autre.

Le problème c'est que quand la checkbox n'est pas cochée et que le user clique dessus, cela la coche immédiatement et donc c'est toujours le code correspondant à la checkbox cochée qui est exécuté !

Comment faire ?
Voyez-vous un autre moyen de procéder ?

[Saintelaitlait]

Je suis pas sur d'Avoir bien saisi mais je vais prendre une chance.


Tu veux qu'une portion de code s'exécute si le checkBox était coché au moment du clique?

Prmièrement, quand tu clique sur un checkbox tu à un événement qui se déclenche , checkedChanged.

Dans ton événement, vérifie si elle est désormais cochée,

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged
        'Si elle est cochée, elle ne l'était pas avant.
        If CheckBox1.Checked = True Then
            ''Code ici si elle était pas cochée. Donc lorsque l'utilisateur la coche
        Else
            'Si elle n'Est pas cochée, elle l'était avant
            'Code ici si elle était coché. Donc lorsque l'utilisateur la décoche
        End If
    End Sub

Logiquement, si elle est cochée au moment du clique, c'est qu'elle ne l'était pas avant

[Mélodie_et_rythmes]

Je suis pas sur d'Avoir bien saisi mais je vais prendre une chance.


Tu veux qu'une portion de code s'exécute si le checkBox était coché au moment du clique?

Prmièrement, quand tu clique sur un checkbox tu à un événement qui se déclenche , checkedChanged.

Dans ton événement, vérifie si elle est désormais cochée,

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox1.CheckedChanged
        'Si elle est cochée, elle ne l'était pas avant.
        If CheckBox1.Checked = True Then
            ''Code ici si elle était pas cochée. Donc lorsque l'utilisateur la coche
        Else
            'Si elle n'Est pas cochée, elle l'était avant
            'Code ici si elle était coché. Donc lorsque l'utilisateur la décoche
        End If
    End Sub

Logiquement, si elle est cochée au moment du clique, c'est qu'elle ne l'était pas avant

Pfff . Je raisonnais à l'inverse lol. Merci beaucoup !

[Jean-Marie Grave]

Bonjour Mélodie

Le code suivant

Code :

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

1
2
3
Private Sub CheckBox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox1.Click
        Label1.Text = "Tata"
 End Sub

Code :

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

1
2
3
Private Sub CheckBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles CheckBox1.MouseDown
        Label1.Text = "Toto"
 End Sub

vous sera peut-être utile.