Ciao ti posto una parte di codice dove c'è l'istruzione per ridimensionare la colonna :
codice:
Private Sub Formatta_GrdCommenti()
Dim StyleGrid As New DataGridTableStyle
StyleGrid.MappingName = "Utenti.commenti"
Dim Col_Dt_Ins As New DataGridTextBoxColumn
Col_Dt_Ins.MappingName = "data_inserimento"
Col_Dt_Ins.HeaderText = "Data"
Col_Dt_Ins.ReadOnly = True
Col_Dt_Ins.Width = 60
Dim Col_Utente As New DataGridTextBoxColumn
Col_Utente.MappingName = "Utente"
Col_Utente.HeaderText = "Utente"
Col_Utente.Alignment = HorizontalAlignment.Center
Col_Utente.ReadOnly = True
Col_Utente.Width = 50
Dim Col_Commento As New DataGridTextBoxColumn
Col_Commento.MappingName = "commento"
Col_Commento.HeaderText = "Commento"
Col_Commento.ReadOnly = True
Col_Commento.Width = 400
Dim Col_Motivo_Commento As New DataGridTextBoxColumn
Col_Motivo_Commento.MappingName = "motivo_commento"
Col_Motivo_Commento.HeaderText = "Motivo"
Col_Motivo_Commento.ReadOnly = True
Col_Motivo_Commento.Width = 150
StyleGrid.GridColumnStyles.Add(Col_Dt_Ins)
StyleGrid.GridColumnStyles.Add(Col_Utente)
StyleGrid.GridColumnStyles.Add(Col_Motivo_Commento)
StyleGrid.GridColumnStyles.Add(Col_Commento)
StyleGrid.BackColor = Color.WhiteSmoke
StyleGrid.AlternatingBackColor = Color.LightGray
StyleGrid.GridLineStyle = DataGridLineStyle.Solid
grdCommenti.TableStyles.Add(StyleGrid)
grdCommenti.CaptionForeColor = Color.Black
End Sub
Spero di esserti stato Utile