UltraWinGridで列の合計を下に固定して表示

gistfile1.vb

Dim band = Me.grdList.DisplayLayout.Bands(0)
Dim setting As Infragistics.Win.UltraWinGrid.SummarySettings
Dim startIndex = band.Columns(GridColumns.Gokei).Index
Dim endIndex = band.Columns(GridColumns.Month10).Index

For colIndex = startIndex To endIndex
    setting = band.Summaries.Add(Infragistics.Win.UltraWinGrid.SummaryType.Sum, band.Columns(colIndex))
    setting.DisplayFormat = "{0:#,##0}"
    setting.Appearance.TextHAlign = Infragistics.Win.HAlign.Right
Next
Me.grdList.DisplayLayout.Override.SummaryDisplayArea =
    Infragistics.Win.UltraWinGrid.SummaryDisplayAreas.GroupByRowsFooter Or Infragistics.Win.UltraWinGrid.SummaryDisplayAreas.BottomFixed