Visual Basic.NET - Celdas del Datagrid

Hola buen día!!!
Si alguien me podría ayudar o dar un tip para usar las celdas del Datagrid en cuanto al ancho de las columnas, he intentado usar la propiedad TableStyles, pero nada. .

Lo ke kisiera es poder cambiar la leyenda de los encabezados, ya que me pone el nombre de los campos y no me convence, además de ke hay campos donde su extensión es más amplia y no se muestran completos. . . :S
Espero y me haya explicado, por su apoyo, muchas gracias anticipadamente....

Dim ts2 As DataGridTableStyle = New DataGridTableStyle
Sub HideColumn()
ts2.MappingName = datagrid1.DataMember
datagrid1.TableStyles.Add(ts2)
datagrid1.TableStyles(0).GridColumnStyles(0).Width = 110
datagrid1.TableStyles(0).GridColumnStyles(0).HeaderText = "Nº Documento"
datagrid1.TableStyles(0).GridColumnStyles(1).Width = 300
datagrid1.TableStyles(0).GridColumnStyles(1).HeaderText = "Almacen"
End Sub

en el evento loaf del form

HideColumn()

Espero te sirva

Hola!! Muchas gracias por responder a mi pregunta....
Lo probé, solo que no sé si hay algo ke hacer antes o ke pasa..porque al momento de llamr el form me marca el siguiente error:

"Index was out of range. Must be non-negative and less than the size of de collection"

¿Que ando fuera de rango??
Mis campos son: Número y Descripción a los cuales le dejé el width de 110 y 300 respectivamente (como tu ejemplo).

Aunado a éste código debo insertar miembros del Tablestyle?? o hacer otra cosa?
Mil Gracias de Nuevo. . . .

el error de indice te sale porque estas tratando de darle valores a campos que no existe por ejemplo si tines tes campos tendras qeu hacer lo siguiente

datagrid1.TableStyles(0).GridColumnStyles(0).Width = 110
datagrid1.TableStyles(0).GridColumnStyles(0).HeaderText = "Nº Documento"

datagrid1.TableStyles(0).GridColumnStyles(1).Width = 300
datagrid1.TableStyles(0).GridColumnStyles(1).HeaderText = "Almacen"

datagrid1.TableStyles(0).GridColumnStyles(2).Width = 300
datagrid1.TableStyles(0).GridColumnStyles(2).HeaderText = "Almacen"

jifate que lo que cambia es GridColumnStyles(2) y la primera columna es 0

Quiero llorar!!!
Porque sólo son dos campos (Número y Descripción) y son dos grid que pongo. . .

Sub HideColumn()
ts2.MappingName = dgbuscar.DataMember
dgbuscar.TableStyles.Add(ts2)
dgbuscar.TableStyles(0).GridColumnStyles(0).Width = 110
dgbuscar.TableStyles(0).GridColumnStyles(0).HeaderText = "Número"
dgbuscar.TableStyles(0).GridColumnStyles(1).Width = 300
dgbuscar.TableStyles(0).GridColumnStyles(1).HeaderText = "Descripción" End Sub

Muchas Gracias...

upsss me olvide, primero debes asignarle el datasource al control datagrid
ejmplo en tu form LOAD deberia estar asi

datagrid1.datasource = tabla
Sub HideColumn()

el error que te sale es porque en principio el datagrid no tiene columnas entonces al pasarle el datasource ya tiene columnas y ya no deberia salirte ese error
chao...

Nada!!!. . . .

En el load del form le tengo:

' Rellenar el DataSet con los datos de la base de datos
Me.dabuscar.Fill(Me.Dsbuslot1)
' Enlazar el DataGrid con el DataSource
dgbuscar.DataSource = Dsbuslot1.Tables(0).DefaultView
HideColumn()

Tmb se lo asigné en modo diseño en las propiedades y me sigue marcando eso....
Muchas Gracias.... :$ . . .

Que raro prueba esto en un nuevo formulario

Imports System.Data.SqlClient
Public Class Form1
Dim cadena As String = "user id=sa;database=northwind;server=."
Dim ts2 As DataGridTableStyle = New DataGridTableStyle
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim cnx As New SqlConnection(cadena)
Dim dap As New SqlDataAdapter("Select CustomerID, CompanyName from customers", cnx)
Dim dts As New DataSet
dap.Fill(dts, "Customers")
'Return dts.Tables("unidad")
Me.datagrid1.DataSource = dts.Tables(0).DefaultView
HideColumn()
End Sub

Sub HideColumn()
ts2.MappingName = datagrid1.DataMember
datagrid1.TableStyles.Add(ts2)
datagrid1.TableStyles(0).GridColumnStyles(0).Width = 110
datagrid1.TableStyles(0).GridColumnStyles(0).HeaderText = "Id Cliente"
datagrid1.TableStyles(0).GridColumnStyles(1).Width = 300
datagrid1.TableStyles(0).GridColumnStyles(1).HeaderText = "Nombe Cliente"
End Sub

End Class

me avisas como te fue chao.

No, sigue igual..
Creo que algo anda mal... jajajajajaja
La verdad si me interesa poder hacer esto porke si me es necesario.. pero sigue con el mismo error. . .
Muchas Gracias, te puedo escirbir un mail???
Saludos

Si escribeme y si puedes adjuntame tu archivo para revisarlo porque lo ultimo que te envie deberia salir bien porque yo lo he probado. Chao.

ya que estamos con este tema, me podrian decir como acceder al contenido de cada celda en un datagrid?, yo me acuerdo que en vb6 si se podia acceder a cada celda y modificar su texto, pero en vb.net no veo nada que me indique como hacerlo, que propiedad debo leer/modificar para lograr esto?, gracias de antemano.