Imports Infragistics.UltraChart.Resources.Appearance
Imports Infragistics.UltraChart.Shared.Styles
' ...
Dim override1 As New Override()
override1.Column = -2 ' match all data columns
override1.Row = 0 ' row #0 only
override1.PE = New PaintElement(Color.Blue, Color.Silver, 255, 150, GradientStyle.ForwardDiagonal, PaintElementType.Gradient)
Me.ultraChart1.Override.Add(override1)
Dim override2 As New Override()
override2.Column = 1 ' column #1 only
override2.Row = -2 ' match all data rows
override2.PE = New PaintElement(Color.Orange)
Me.ultraChart1.Override.Add(override2)
Dim override3 As New Override()
override3.Column = 1 ' column #1 only
override3.Row = 0 ' row #0 only
override3.PE = New PaintElement(Color.HotPink)
Me.ultraChart1.Override.Add(override3)
' override3, the last override added to the collection,
' takes precedent over all previous overrides.
Me.ultraChart1.InvalidateLayers()