mostrar datos de una tabla en un datagridview

Hola:
Prueba esto

Private Sub lP_ActualizaGrid()
Dim msQuery As String
Dim moDataSet As Data.DataSet
Dim moDataAdapter As OleDbDataAdapter
msQuery = "Select * from TUTABLA"
'crear el data set
moDataSet = New Data.DataSet
moDataAdapter = New OleDbDataAdapter(msQuery, moConexion)
moDataAdapter.Fill(moDataSet, "TUTABLA")
'enlazar el dataset con el datagrid
'en DataSource se asigna el dataset
'en DataMember el nombre de la tabla del dataset que se mostrara en el
grid
Me.dgrDatos.DataSource = moDataSet
Me.dgrDatos.DataMember = "TUTABLA"
End Sub

Espero que te sirva
Un saludo desde Bilbo:
Carlos

escribió en el mensaje
news:
hola amigos espero me puedan ayudar en este problema que tengo, como
puedo mostrar los datos de una tabla de sqlserver 2000 conectada con un
windows form por medio de código, emple algunas, como estas pero no
me funciona

dim cmd as new sqlCommand("select * from a tipos", cn)
dim da as new sqlDataAdapter
da. selectCommand=cmd
Dim dset as New DataSet
da.fill(dset,"tipos")
dataGrid1.DataSource=dset.table("tipos")

que me falta en este codigo para que me funcione
gracias

preguntó:

que me falta en este codigo para que me funcione

Pues te falta depurar el código, porque salvo que te hayas equivocado a la
hora de escribir el mensaje, a simple vista se aprecian dos errores.

dim cmd as new sqlCommand("select * from a tipos", cn)

Suponiendo que la variable objeto «cn» haga referencia a una instancia de la
clase «SqlConnection», y que la conexión se encuentre debidamente
configurada y abierta, de la consulta SQL de selección te sobra la vocal
«a». La consulta sería así:

Dim cmd As New SqlCommand("SELECT * FROM Tipos", cn)

dataGrid1.DataSource=dset.table("tipos")

El objeto DataSet tiene una colección llamada «Tables», en plural, por lo
que si tu intención es que el control DataGrid se rellene con los datos de
la DataTable llamada «tipos», ejecutarías lo siguiente:

dataGrid1.DataSource = dset.Tables("tipos")

Y si los errores no se deben a que te has equivocado a la hora de escribir
el mensaje, coméntanos la declaración que haces de la variable objeto «cn»,
así como la cadena de conexión que utilizas para abrir la conexión.

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.