Visual Basic - Acceder a Access 2000 a traves de Codigo en VB6

Necesito saber como debo hacer para traer informacion a un textbox a travez de codigo Ado.

No se como seguir a partir de aca

dim DB as Connection
Dim RS as Recordset
set DB= New Connection
set RS= New Recordset
DB.Open "Provider=Microsoft.jet.odbc.3.51;data source=C:\mibase.mdb"

Debes hacer referencia Jet 3.6 para poder accesar las mdb de office 2000,
Micro Soft actualizó esta referencia en la versión de Acces2000. Si usas 3.51
solo podrás accesar las mdb de Acces 97. Si usas ADO para conectarte, te
recomieno hacer referencia en el menú proyecto a que harás uso de las librerías
de ADO. Y en el código hace referencia a ADO también:

Dim Db as adoDB.Database
Dim Rs as adoDB.Recordset

Si quieres conocer más sobre acceso a base de datos usando ADO te recomiendo
leer el libro Bases de Datos con Visual Basic 6 Editorial Prentice Hall autor Jeffrey P.
McManus. Capítulo 10

que tengas éxito

Hola te puedo enviar un codigo de programa con acceso a bases de datos solamente con uso de codigo.
Marcos.