Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub Button25_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button25.Click
Dim band As UltraGridBand = Me.UltraGrid1.DisplayLayout.Bands(0)
' Set the AutoPreviewEnabled to enable row previews.
band.AutoPreviewEnabled = True
' Set the AutoPrevieField to the field contents of which will be displayed
' in the row preview.
band.AutoPreviewField = "Address"
' Indent the text in row previews by 5 pixels
band.AutoPreviewIndentation = 5
' Allow the row previews to display up to 4 lines of text if the text is
' multiline.
band.AutoPreviewMaxLines = 4
' Change how the row preview will look by setting RowPreviewAppearance
' off the override.
band.Override.RowPreviewAppearance.BackColor = Color.DarkBlue
band.Override.RowPreviewAppearance.ForeColor = Color.LightYellow
' You can set the row preview appearance on per row basis overriding the
' settings on the Override.RowPreviewAppearance.
Me.UltraGrid1.Rows(0).PreviewAppearance.BackColor = Color.Red
End Sub