¿Tiene que ser escritura de VB, o podría usted utilizar un programa capaz, libre?
Utilizo personalmente Renamer de http://www.den4b.com/projects.php.
Lee