DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, False).Location
'to get mouse location
Private Sub DataGridView1_CellMouseClick(sender As Object, e As DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseClick
Dim newpoint As New Point
newpoint = DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, False).Location
newpoint.X = newpoint.X + e.X
newpoint.Y = newpoint.Y + e.Y
End Sub