Visual Basic - Pasar un archivo de una carpeta a otra

Hola amigos necesito una ayuda . Quiero mover un archivo de una carpeta a otra , porfa envienme un ejemplo se los agradesco anticipadamente

Podrias usar Filecopy juntamente con Kill
Si quisieramos copiar el archivo "Hola.txt" desde "C:\" a "C:\Temp"

if Dir("C:\Hola.txt",vbArchive) <> "" Then

FileCopy "C:\Hola.txt", "C:\Temp\Hola.txt"
Kill "C:\Hola.txt"

End If

Si no pones el if y el archivo no existe esto te peta.