Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub Button55_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button55.Click
Dim band As UltraGridBand = Me.UltraGrid1.DisplayLayout.Bands(0)
' Enable card view.
band.CardView = True
' Set the CaptionField to the key of a column. Card captions will contain text
' from this column.
band.CardSettings.CaptionField = "CustomerID"
Dim row As UltraGridRow = Me.UltraGrid1.Rows(0)
' You can override the caption text for a particular row by setting the CardCaption
' property of that row to a custom text.
row.CardCaption = "Custom Caption"
End Sub