Individuare con quale tasto del mouse si è cliccato in una cella della GridView

Per individuare con quale tasto del mouse si è cliccato in una cella di una GridView, è possibile utilizzare questo semplice codice:

Public Sub Form_Open()
 
 With GridView1
   .Columns.Count = 10
   .Rows.Count = 25
 End With
  
End


Public Sub GridView1_MouseUp()
 
 Select Case Mouse.Button
   Case 1
     GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Sinistro"
   Case 2
     GridView1[GridView1.Row, GridView1.Column].Text = "Tasto Destro"
 End Select
 
 GridView1.Columns[GridView1.Column].Width = -1
 
End