Visual Basic - Manejo de Archivos

Hola que tal espero alguien me pueda ayudar

Lo que hago es leer un archivo .txt en una rutina con un timer donde lo que hace es buscar, lo lee, lo trabaja y vuelve a regresar a la carpeta par ver si existe otro archivo, los datos son subidos a la BD en oracle 8i a traves de un 'Procedure' sin embargo cuando llegan a ser mas de 3 archivos dentro de la carpeta de donde los busco, Visual Basic ya no responde.

Nota: el Procedure corre perfectamente sobre oracle.
Gracias!!

asegurate de que en el timer haces esto:
sub timerx()
timerx=false
...codigo
timerx=true
endsub

asegurate de que en el timer haces esto:
sub timerx()
timerx=false
...codigo
timerx=true
endsub