Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub Button38_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button38.Click
Dim app1 As Infragistics.Win.Appearance = Nothing
' Calling Add method with a key will create a new Appearance object and add it to
' the collection. The passed in string is the key of the new appearance that you can
' use to access the appearance later on. The return value is the new appearance object
' that was created.
app1 = Me.UltraGrid1.DisplayLayout.Appearances.Add("A1")
' Setup the app1 appearance.
app1.BackColor = Color.Blue
app1.ForeColor = Color.White
' Here is the code that shows you how to use the AppearancesCollection to access the
' appearances that we have added to it.
Me.UltraGrid1.DisplayLayout.Override.CellAppearance = Me.UltraGrid1.DisplayLayout.Appearances("A1")
End Sub