Même déroulement pour un DoubleCLick et un KeyDown d'un DataGridView

Version imprimable

Bonjour,

Je souhaiterais que lorsque je double click sur mon DataGridView (sur l'une des lignes) il effectue l’événement du KeyDown:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub DGVRecherche_KeyDown(sender As Object, e As KeyEventArgs) Handles DGVRecherche.KeyDown
 
            Dim idBeneficiaire As String = DGVRecherche.SelectedRows(0).Cells("IDENTIFIANT").Value.ToString
            Dim role As String = DGVRecherche.SelectedRows(0).Cells("ROLE").Value.ToString
            Dim idAssureP As String = DGVRecherche.SelectedRows(0).Cells("ASSURE").Value.ToString
 
            If e.KeyCode = Keys.Enter Then
                numeroDeContrat = chercherContrat(idBeneficiaire, role, idAssureP)
                MsgBox(numeroDeContrat)
            End If
 
        End Sub

Je ne voie pas quoi utiliser, j'ai entendu parler d'un "EditingControl" mais je ne voie pas comment l'utiliser, merci! :?

Bonjour,

Tu crés une méthode que tu appelles depuis les 2 évènements.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
    Private Sub DGVRecherche_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles DGVRecherche.KeyDown
        If e.KeyCode = Keys.Enter Then Rechercher()
    End Sub
    Private Sub DGVRecherche_DoubleClick(sender As System.Object, e As System.EventArgs) Handles DGVRecherche.DoubleClick
        Rechercher()
    End Sub
    Sub Rechercher()
        Dim idBeneficiaire As String = DGVRecherche.SelectedRows(0).Cells("IDENTIFIANT").Value.ToString
        Dim role As String = DGVRecherche.SelectedRows(0).Cells("ROLE").Value.ToString
        Dim idAssureP As String = DGVRecherche.SelectedRows(0).Cells("ASSURE").Value.ToString
        numeroDeContrat = chercherContrat(idBeneficiaire, role, idAssureP)
        MsgBox(numeroDeContrat)
    End Sub

22/04/2014, 13h41
Kreepz

Effectivement j'avais pas pensé à aussi simple que ça... :?

Merci! Bonne journée! :roll: