Visual Basic - URGENTE mensaje de error

tengo una aplicacion que introducido un codigo de producto, me busca la descripcion de este y todos sus componentes, la primera vez que lo ejecuto funciona, pero sin cerrar la aplicacion, si le pido que busque otro producto me da el siguiente error:

Error "3070" en tiempo de ejecucion
El motor de base de datos microsoft jet no reconoce 're_sub' como un nombre de campo o expresion valido.

el puntero lo situo al princio de la BD (data1.recordset.movefirst) cuando el text box que recoje el codigo recibe el foco.
¿Sabe alguien por que me da este error?
Gracias

Primero ke nada ... si estas usando un control Data... grave error pero bueno ke va.... a lo mejor creo ke tienes el error al llenar el recordset con datos o sea cuando haces la consulta, este te esta abriendo nuevamente la base de datos y la tabla solicitada cuando ésta ya ha sido abierta dentro del mismo programa.. por eso cuando cierras el formulario cierras todos los recordsets abiertos y cuando lo vuelves a cargas te funciona... si tienes dudas me envias el codigo y te puedo ayudar de mejor forma.
CONSEJO: NO UTILICES EL CONTROL DATA... TRATA DE APRENDER A USAR OTRO TIPO DE CONEXIONES A DATOS SIN USAR EL DATA.