Visual Basic.NET - Como cargo de datos un DataGridView con ADO

Hola tengo una dudita, la cual expongo mediante el siguinete codigo:

RsAuxLo = Nothing
RsAuxLo = New ADODB.Recordset
oStrSQL = vbNullString
oStrSQL = "SELECT COD_ALU, CED_ALU, NOM_ALU, CED_REP, NOM_REP "
oStrSQL = oStrSQL & "FROM DAT_ALU"

RsAuxLo.Open(oStrSQL, oConDat, _
ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic, 1)

If RsAuxLo.EOF = False Then

FrmBar.DatGri.DataSource = Nothing
FrmBar.DatGri.DataSource = RsAuxLo

endif

no me carga nada de datos el grid y el recorset biene cargado, lo empleo por que lo hacia para basic 6.0 y pense que me funcionaria, pero no fue asi, ahora estoy en basic .net 2006 y no he podido cargar de datos, les agradeceria toda la ayuda aportada , gracias

dim conexion As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source= c:\data .mdb;Jet OLEDB:System Database=c:\ data.mdw;User
ID=user;Password=pas;")
'este es el string para conectar a access
dim odataset as new dataset
dim ocommand as new oledb.oledbcommand ("Select * From Clientes")
dim oadaptador as new oledb.oledbdataadapter

oadaptador.selectcommand = ocommand
odataptador.fill (odataset,"Clientes")

datagridview1.datasource = odataset
datagridview1.datamember = odataset.tables("Clientes").tablename

esta es una conexcion con ado.net

Se me olvidaba
'tienes que pasarle la conexcion al command
Dim ocommand As New OleDb.OleDbCommand("Select * From clientes", conexion)

Disculpa lo que pasa esque ando intentando lo mismo, y tomé el codigo que pusiste Haver y me genera un error.. A que se debe.. ??

No se encontró OleDbException..
No se puede iniciar la aplicación. Falta el archivo de información del grupo de trabajo o bien está abierto en modo exclusivo por otro usuario.

Dim conexion As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source= c:\BD.mdb;Jet OLEDB:System Database=c:\BD.mdw;User ID=user;Password=pas;")
'este es el string para conectar a access
Dim odataset As New DataSet
Dim ocommand As New OleDb.OleDbCommand("Select * From TV", conexion)
Dim oadaptador As New OleDb.OleDbDataAdapter

oadaptador.SelectCommand = ocommand
oadaptador.Fill(odataset, "TV") <<<---- ( ERROR - AKÏ ME SEÑALA)

DataGridView2.DataSource = odataset
DataGridView2.DataMember = odataset.Tables("TV").TableName

Lo que sucede es dependiendo de que forma y que seguridad tengas en tu base de datos de access
este error te lo da porque no puede encontrar el archivo .MDW de acceso a la base
si esta se abre en modo de multiusuario

Falta el archivo de información del grupo de trabajo o bien está abierto en modo exclusivo por otro usuario.

revisa esta pagina para hacer tu string de conexcion de acuerdo a tus necesidades

www.connectionstrings.com