Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Imports System.Diagnostics
Private Sub Button72_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button72.Click
' Following code loops throug all the top level rows in the UltraGrid.
' It prints out the row indexes for illustration purposes.
' Get the first row in the UltraGrid.
Dim row As UltraGridRow = Me.ultraGrid1.GetRow(ChildRow.First)
' Write the index of the row.
Debug.WriteLine("" & row.Index)
While row.HasNextSibling(True, False)
row = row.GetSibling(SiblingRow.Next, True, False)
' Write the index of the row.
Debug.WriteLine("" & row.Index)
End While
End Sub
Private Sub Button73_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button73.Click
' Following code loops throug all the top level rows in the UltraGrid backwards.
' It prints out the row indexes for illustration purposes.
' Get the last row in the UltraGrid.
Dim row As UltraGridRow = Me.ultraGrid1.GetRow(ChildRow.Last)
' Write the index of the row.
Debug.WriteLine("" & row.Index)
While row.HasPrevSibling(True, False)
row = row.GetSibling(SiblingRow.Previous, True, False)
' Write the index of the row.
Debug.WriteLine("" & row.Index)
End While
End Sub