Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        Dim c As DataGridCell = DataGrid1.CurrentCell
        Debug.WriteLine(_dvCustomers(c.RowNumber)(c.ColumnNumber).ToString())
    End Sub

    Private Sub DataGrid1_MouseDown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.MouseEventArgs) Handles DataGrid1.MouseDown
        Dim hti As DataGrid.HitTestInfo = DataGrid1.HitTest(e.X, e.Y)
        Debug.WriteLine(_dvCustomers(hti.Row)(hti.Column).ToString())
    End Sub