Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click Dim MaValeur As Integer = 500200 Try WriteInteger("1 programne", &H0000000, MaValeur) WriteInteger("1 programme", &H0000001, MaValeur) WriteInteger("1 programme", &H0000002, MaValeur) WriteInteger("1 programme", &H0000003, MaValeur) Catch ex As Exception 'ici quand la personne aura cliqué sur ce bouton il aura 500200 points End Try End Sub 'ici ses points ont augmenté mais on ne sait pas jusqu'à combien Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged 'Ici quand le bouton sera coché la valeur restera la même jusqu'a ce que je décoche la case en prenant compte les points qu'il a déjà ! ' C'est ce que je demande comment faire cela !
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click Dim MaValeur As Integer = 500200 Try if (not CheckBox1.enebale) { WriteInteger("1 programne", &H0000000, MaValeur) WriteInteger("1 programme", &H0000001, MaValeur) WriteInteger("1 programme", &H0000002, MaValeur) WriteInteger("1 programme", &H0000003, MaValeur) } Catch ex As Exception 'ici quand la personne aura cliqué sur ce bouton il aura 500200 points End Try End Sub 'ici ses points ont augmenté mais on ne sait pas jusqu'à combien Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged 'Ici quand le bouton sera coché la valeur restera la même jusqu'a ce que je décoche la case en prenant compte les points qu'il a déjà ! ' C'est ce que je demande comment faire cela !
Plus personne ne peut m'aider s'il vous plait ?