[Visual Basic] Problème compteur de click sur un boutton Fermé

Question

Bonjour à tous, 

J'essaye de concevoir un logiciel, et installer un compteur de click sur mon bouton 2. Ce nombre s'afficherait alors dans ma textbox11. Voici le code : 

Private Sub TextBox11_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox11.TextChanged 
        Dim i As Integer 
        i = 0 
        If "je click sur le bouton 2" Then 
            i = i + 1 
        End If 
        TextBox11.Text = i 
    End Sub 

Mon problème, c'est que je ne sais pas dire :"je click sur le boutton2" 
Merci de votre aide !

f894009 · Accepted Answer

Bonjour,

le code est a mettre "dans" le bouton pour afficher dans la textebox:

a vous d'adapter pour vb.net

Public i As Integer 

Private Sub Bouton_Click()
     i = i + 1
    TextBox11.Text = i
End Sub 

Bonne suite

Timezer · Answer

Bonjour, merci de votre réponse,

J'ai mis ce que vous m'avez dit,
la première fois que je clique sur le bouton, il m'affiche bien "1", mais après j'ai beau cliqué sur le bouton, la textbox m'affiche toujours 1 :/

Voici le programme de mon bouton :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        i = i + 1
        TextBox11.Text = 1
        TextBox2.Focus()
        TextBox2.Select()
        If TextBox2.Text < TextBox4.Text Then
            TextBox3.ForeColor = Color.Blue
            TextBox3.Text = "C'est plus grand"
            TextBox8.Text = TextBox2.Text
            TextBox2.Text = ""
        End If
        If TextBox2.Text > TextBox4.Text Then
            TextBox3.ForeColor = Color.Red
            TextBox3.Text = "C'est moins grand"
            TextBox6.Text = TextBox2.Text
            TextBox2.Text = ""
        End If
        If TextBox2.Text = TextBox4.Text Then
            My.Computer.Audio.Play(My.Resources.applaudissements, AudioPlayMode.Background)
            TextBox3.ForeColor = Color.Lime
            TextBox3.Text = "C'est gagné"
            TextBox10.Text = TextBox2.Text
            Button3.Visible = True
            Button2.Enabled = False
            AcceptButton = Button3
            TextBox2.Text = ""
        End If
    End Sub

J'ai mis "Public i As Integer" juste en dessous de form1.

Timezer · Answer

OUPS 
Je suis désolé, j'ai fait une faute de frappe, j'ai mis un "1" à la place du "i" 
Le compteur met désormais correctement. 
Merci f894009 ;)

f894009 · Answer

Re,

TextBox11.Text = 1  si c'est cela que vous avez mis, c'est normal. Cherchez l'erreur!!!!

lermite222 · Answer

Bonjour, bonjour Fxx 
sans variable.. 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
        TextBox1.Text = Val(TextBox1.Text) + 1 
    End Sub 

A+  
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius) 
Note: Je ne répond pas aux MP pour les questions techniques. Et ma boule de cristal est cassée .

[Visual Basic] Problème compteur de click sur un boutton

5 réponses

Discussions similaires