My.Computer.FileSystem.MoveFile("C:\Folder1\File1.txt", _
"C:\Folder2\File2.txt")
My.Computer.FileSystem.MoveFile("C:\Folder2\File2.txt", _
"C:\Folder1\file1.txt")

Dim filetr As New FileInfo("Dsetup.dll")
filetr .MoveTo("Dsetup.bak")
Sleep (500) ' Remember in order for this to work you need to add the sleep code from the snippets form, otherwise you can use threading.sleep, but I don't recommend it.
Dim filetm As New FileInfo("C:\Location\Dsetup.dll") ' Your location = wherever file is located
filetm .MoveTo("Wherever you want it\Dsetup.dll") ' Wherever it is this file needs to go