Visual Basic - Ancho de columna con DBGRID

Hola amigos,
A ver si me podeis ayudar.... Lo que necesito es personalizar el ancho de las columnas del DBGRID....me explico.....
Tengo campos cortos y largos,por tanto quiero que por ejemplo la columna 1 sea más ancha que la columna 2, y la columna 3 un poco más ancha que la 1.¿Hay alguna manera de hacerlo?.
GRACIAS A TODOS POR ATENDERME.
un saludo.

hola Juan. Tienes que usar el objeto column del dbgrid. Por ejemplo:
dbgrid1.columns(indice).width
lo hago de memoria pero creo que es asi. Un saludo

Juan , te envio un pequeño codigo que puedes usar para indicarle al dbgrid el ancho de las columnas segun el largo de cada campo.
debes tener un control data y un dbgrid y en form escribir el siguiente codigo.

ncam = Data1.Recordset.Fields.Count ' total de campos de la base
'MsgBox Data1.Recordset.Fields(1).Size ' tamaño del campo de la base

For i = 0 To ncam - 2
With DBGrid1.Columns(i)
.Caption = Left(Data1.Recordset.Fields(i).Name, 6) ' titulo de los encabezados de los campos. Le puse un ancho de 6 caracteres, no es necesario
.Width = TextWidth(String(Data1.Recordset.Fields(i).Size + 1, "M")) ' ancho del campo. utilizo la letra M que es mas ancha que las otras letras
End With
Next i

dbgrid1.refresh ' se refresca el grid

Espero que te ayude
Saludos desde Chile