Visual Basic.NET - No se como saber evento lanzado

Private Sub DataGridView(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DataGridView.CellMouseClick, DataGridView.CellMouseDoubleClick

'Aquí me gustaría poder saber cuál de los 2 eventos se ha lanzado, alguna forma que pudiera separarlo, algo así:

if evento_lanzado = CellMouseClick then

         msgbox "hemos hecho un simple click sobre una celda"

elseif evento_lanzado = cellMouseDoubleClick then

        msgbox "hemos hecho soble-click sobre una celda"

end if

end sub

If e.clicks = 1 then

  Msgbox “has hecho click”

Elseif e.clicks =2 then

   Msgbox “has hecho doble-click”

End if

Dim WithEvents TimerCuantaClick As New Timer   ' Declaración a nivel de formulario

    Dim CuantaClick As Integer = 0

    Private Sub UnaHerramientaVisual_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles UnaHerramientaVisual.MouseClick

        If CuantaClick = 0 Then

            TimerCuantaClick.Interval = 200 ' Milliseconds, tiempo entre dos Click en DoubleClick : tiene que ajustar

            TimerCuantaClick.Start()

            CuantaClick = 1

        Else

            TimerCuantaClick.Stop()

            TratarClick(2)

            CuantaClick = 0

        End If

    End Sub

    Private Sub TimerCuantaClick_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TimerCuantaClick.Tick

        TimerCuantaClick.Stop()

        CuantaClick = 0

        TratarClick(1)

    End Sub

    Private Sub TratarClick(ByVal NumeroClick As Integer)

        Select Case NumeroClick

            Case 1

                MessageBox.Show("Click")

            Case 2

                MessageBox.Show("DoubleClick")

        End Select

    End Sub