Координаты X,Y верхнего левого угла выделенной ячейки в DataGridView - Visual Basic .NET

Dim pt As Point
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox(pt.ToString)
    End Sub
Private Sub DataGridView1_CellPainting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellPaintingEventArgs) Handles DataGridView1.CellPainting
        If e.State = DataGridViewElementStates.Selected Or DataGridViewElementStates.Visible Or DataGridViewElementStates.Displayed Then
            pt = New Point(e.CellBounds.X, e.CellBounds.Y)
        End If
    End Sub