' Visual Basic
Private Sub myDataGrid_MouseDown(ByVal sender As Object, _
ByVal e As MouseEventArgs) Handles myDataGrid.MouseDown
Dim myGrid As DataGrid = CType(sender, DataGrid)
Dim hti As System.Windows.Forms.DataGrid.HitTestInfo
hti = myGrid.HitTest(e.X, e.Y)
Dim message As String = "You clicked "
Select Case hti.Type
Case System.Windows.Forms.DataGrid.HitTestType.None
message &= "the background."
Case System.Windows.Forms.DataGrid.HitTestType.Cell '''这里判断
message &= "cell at row " & hti.Row & ", col " & hti.Column