Questa:
http://msdn.microsoft.com/it-it/library/system.windows.forms.datagrid(VS.80).aspx
è la pagina MSDN dove si parla del DataGrid. C'è un esempio dove fa vedere come aggiungere elementi alla griglia
Dopo aver letto l'esempio, un metodo di procedere (molto rozzo) che mi è venuto in mente è questo:
Dim tuoDataGrid As DataGrid
Dim tuoDataSet As DataSet = tuoDataGrid.DataSource
Dim tuoDataTable As DataTable = tuoDataSet.Tables(0)
Dim lunghezzeMax(tuoDataGrid.TableStyles(0).GridColumnStyles.Count - 1) As Integer
For Each row As DataRow In tuoDataTable.Rows
'codice per ottenere il testo e determinare
'le lunghezze massime di ogni colonna
Next
For i As Integer = 0 To tuoDataGrid.TableStyles(0).GridColumnStyles.Count - 1
tuoDataGrid.TableStyles(0).GridColumnStyles(i).Width = lunghezzeMax(i)
Next
Personalmente non l'ho provato, quindi fammi sapere se c'è qualcosa che non va...
Luca