Dim EstilTaula As New DataGridTableStyle
Dim EstilCol As DataGridTextBoxColumn
EstilCol = New DataGridTextBoxColumn
EstilCol.HeaderText = "REF. PRODUCTE"
EstilCol.MappingName = dsProdPF.Tables(0).Columns(0).ColumnName
EstilCol.Width = 160
EstilCol.ReadOnly = True
EstilTaula.GridColumnStyles.Add(EstilCol)
EstilCol = New DataGridTextBoxColumn
EstilCol.HeaderText = "DESCRIPCIÓ"
EstilCol.MappingName = dsProdPF.Tables(0).Columns(1).ColumnName
EstilCol.Width = 335
EstilCol.ReadOnly = True
EstilTaula.GridColumnStyles.Add(EstilCol)
EstilTaula.AlternatingBackColor = Color.Wheat
EstilTaula.MappingName = dsProdPF.Tables(0).TableName
EstilTaula.AllowSorting = True
Me.dgProdFinal.TableStyles.Add(EstilTaula)
Salut