For Each Colonna In e.Layout.Bands(0).Columns
                Select Case TIPO_DATASET
                    '*************************************************************************************************************************
                    '_*_*_*_*_*_*_*_*_*_*_*_*__*_*_*_*_*_*_*_*_*_*_*_*__*_*_*_*_*_*_*_*_*_*_*_*__*_*_*_*_*_*_*_*_*_*_*_*__*_*_*_*_*_*_*_*_*_*_
                    Case "ST"
                        'SELEZIONE DELLA KEY DELLA COLONNA IN GRIGLIA
                        Select Case Colonna.Key
                            Case "TOTALE_TC"
                                Colonna.Width = 130
                                Colonna.Header.Caption = "TOTALE"
                                Colonna.AllowUpdate = AllowUpdate.No
                                Colonna.Header.Style.HorizontalAlign = HorizontalAlign.Center
                                Colonna.CellStyle.HorizontalAlign = HorizontalAlign.Right
                                Colonna.CellStyle.Wrap = True
                                Colonna.CellStyle.Padding.Right = 2
                                Colonna.CellStyle.Padding.Left = 2
                                Colonna.IsBound = True
                            Case "DESCRIZIONE_LIV3"
                                Colonna.Width = 300 'Unit.Percentage(25)
                                Colonna.AllowUpdate = AllowUpdate.No
                                Colonna.Header.Caption = "DESCRIZIONE"
                                Colonna.CellStyle.Wrap = True
                                Colonna.CellStyle.Padding.Right = 2
                                Colonna.CellStyle.Padding.Left = 2
                                Colonna.Header.Style.HorizontalAlign = HorizontalAlign.Center
                                Colonna.CellStyle.HorizontalAlign = HorizontalAlign.Left
                                Colonna.IsBound = True
                            Case Else
                                Select Case Mid(Colonna.Key, 1, 3)
                                    Case "TC_"
                                        Colonna.IsBound = False
                                        Colonna.Width = 130
                                        Colonna.AllowUpdate = AllowUpdate.Yes
                                        Colonna.Header.Style.HorizontalAlign = HorizontalAlign.Center
                                        Colonna.CellStyle.HorizontalAlign = HorizontalAlign.Right
                                        Colonna.CellStyle.Wrap = True
                                        Colonna.CellStyle.Padding.Right = 2
                                        Colonna.CellStyle.Padding.Left = 2
                                        APPO_ROW = DS_GRIGLIA.Tables("LIVELLO_COLONNE").Select("TC = " & Mid(Colonna.Key, 4, 2))
                                        Colonna.Header.Caption = APPO_ROW(0)("DESCRIZIONE").ToString

                                        Colonna.IsBound = True

                                        Colonna.CellStyle.HorizontalAlign = HorizontalAlign.Right
                                End Select
                        End Select

.....

 

Protected Sub Dati_UpdateCell(ByVal sender As Object, ByVal e As Infragistics.WebUI.UltraWebGrid.CellEventArgs) Handles Dati.UpdateCell

end sub