Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinGrid
Private Sub Button7_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button7.Click
Dim column As UltraGridColumn = Me.UltraGrid1.DisplayLayout.Bands(0).Columns("Region")
column.Case = Infragistics.Win.UltraWinGrid.Case.Upper
End Sub