Imports Infragistics.Win Imports Infragistics.Win.UltraWinGrid ... Private Sub UltraGrid1_DoubleClickCell(ByVal sender As Object, _ ByVal e As Infragistics.Win.UltraWinGrid.DoubleClickCellEventArgs) _ Handles UltraGrid1.DoubleClickCell ' Get the cursor position Dim point As Point = System.Windows.Forms.Cursor.Position ' Convert to the grid's client coordinates point = Me.UltraGrid1.PointToClient(point) ' Get the UIElement at those coords, if there is one Dim oUI As UIElement = Me.UltraGrid1.DisplayLayout.UIElement.ElementFromPoint(point) Dim oCellUI As CellUIElement If oUI Is Nothing Then Return End If ' Now we have the lowest level element at the given coordinates. ' To get the CellUIElement, walk up ' the parent chain until we hit a CellUIElement, or die trying While Not oUI Is Nothing If oUI.GetType() Is GetType(CellUIElement) Then ' Get the CellUIElement as the proper type oCellUI = oUI ' Display the cell's value MessageBox.Show("Cell.Value = " + oCellUI.Cell.Value.ToString()) End If oUI = oUI.Parent End While End Sub