Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinDataSource
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim childBand As UltraDataBand = Me.UltraDataSource1.Band.ChildBands(0)
Dim index1 As Integer = Me.UltraDataSource1.Band.ChildBands.IndexOf(childBand)
Dim index2 As Integer = childBand.Index
' Following two lines should print out the same index.
Debug.WriteLine("Index1 = " & index1)
Debug.WriteLine("Index2 = " & index2)
End Sub