'ファイルの移動
Try
    My.Computer.FileSystem.MoveFile("C:\TEST\TEST.txt", _
                                    "C:\TEST\TEST1.txt", _
                                    False)
Catch ex As Exception
    MessageBox.Show(ex.Message)
End Try