Ændre Kolonne brede og Headertext i Datagrid

Hejsa
Jeg er ved at lave et lille program til min pocket pc, men har fået lidt problemer med Datagrid'en, jeg har fået lagt de data over i den som jeg ønsker.
Men hvordan ændre jeg kolonne bredden og Headertexten?

Den kode som jeg har brugt ser sådanne ud:

rsTables.Close()
rsTables = New InTheHand.AdoceNet.Recordset


sql1 = "SELECT Varerelation, Varenavn1, Antal, Sats, Valuta FROM LagDebRabat INNER JOIN LagKart ON LagDebRabat.Varerelation=LagKart.Varenummer WHERE LagDebRabat.Kontorelation =" & Label6.Text

rsTables.Open(sql1, cn)

  ' Load the grid.
DataGrid1.DataSource = rsTables


Jeg har været inde på div. hjemmesider men uden at finde noget som jeg kunne få til at virke.
Så derfor kunne det være dejligt med lidt VB kode hjælp.

Henrik