Discussion :

[djelloharmel]

bonjour.

j'ai un bouton "ok_bt" dont l'évènement au click est le suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub ok_bt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ok_bt.Click
        Select Case FeuilleActive
            Case "Livraison"
                f_livraison_reception_client.reference_article.Text = grille.Item("code", grille.CurrentRow.Index).Value
            Case "Reception"
                f_livraison_reception_four.reference_article.Text = grille.Item("code", grille.CurrentRow.Index).Value
        End Select
 
        Me.Close()
 
        Select Case FeuilleActive
            Case "Livraison"
                f_livraison_reception_client.quantite.Select()
            Case "Reception"
                f_livraison_reception_four.quantite.Select()
        End Select
    End Sub

je veux que cet évènement soit appelé quand je double-clique dans ma grille de données "grille"

[spottt]

Si c'est une DataGridView, regarde du côté de l'event "DoubleClick".

[Kropernic]

Pour cela, il faut comprendre la ligne de déclare de la procédure qui, dans ton cas, est :

Code :

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

1
2
 
Private Sub ok_bt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ok_bt.Click

Si on décompose cela on a :

- "Private Sub" qui indique que cette une procédure privée de la classe (elle ne sera pas visible aielleur)

- "ok_bt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)" qui sont son nom et ses paramètres

- "Handles ok_bt.Click" qui indique que cette procédure est appelée pour l'évènement "Click" du contrôle qui se nomme "ok_bt"


C'est donc cette dernière partie qui t'intéresse. Inutile de réécrire le même code dans une procédure à partr pour l'évènement DoubleClick de ta grille. Ajoute simplement à la suite le ou les évènements supplémentaire que cette procédure doit gérer en les séparant par une virgule.

Griftou.

[shayw]

Salut

peut etre comme ça à adapter

Code :

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

1
2
3
4
5
6
7
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        MessageBox.Show("you click here")
    End Sub
 
    Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick
        Call Button1_Click(sender, e)
    End Sub

[Kropernic]

Pourquoi alourdir le code avec des appels inutiles alors que cela pour s'écrire comme suit :

Code :

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

1
2
3
4
 
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click, TextBox1.DoubleClick
        MessageBox.Show("you click here")
    End Sub

L'élément important à comprendre se trouve après la clause Handles (3e partie que j'ai décrite dans mon précédent message).

Griftou.