http://www.recursosvisualbasic.com.ar/htm/vb-net/3-ejemplos-con-archivos-en-vb-net.htm
ejm
Código:
ruta2 = ruta1
ruta2 = ruta2.replace("www.pagina.com ","")
ya sólo te quedaria renombrar
FileSystem.RenameFile(ruta1, ruta2)
O lo podrias hacer manualmente