problema Coneccion VB 6 y Access

[gacs]

el punto es el siguiente... tengo un form que guardara informacion en una base de datos... el punto es que segun la condicion de un listbox quiero que recoja datos de una tabla de access y me los entrege en un textbox para validarlos...
mas o menos asi....

cuando le doy click al boton:
select case list1
case valor1..... el problema se me genera cuando quiero asignar a un data la base de datos y a los textbox las correspondientes tablas de esa base

'asigna datos del data
Data_imo.DatabaseName = App.Path & "\base_activos.mdb"

Data_imo.RecordSource = imo (Nombre de la Tabla)

'asigna datos de los textbox de imo

ValIMOCalle.DataSource = Data_imo (Aka me aparece el error)
ValIMOCalle.DataField = PLAZA

ValIMOUso.DataSource = Data_imo
ValIMOUso.DataField = USO

por fa... lo necesito.... certamen luego y no caxo como hacerlo jajajajjaja

de antemano mxas gracias!!!!