为什么我的代码错了？

本文介绍了为什么我的代码错了？的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述

Dim newName As String = String.Format("{0}.exe", Path.GetRandomFileName().Replace(".", "")) Dim oldName As String = "C:\j\WindowsApplication1.exe" If File.Exists(oldName) Then File.Move(oldName, newName) Dim lngMoveFile As Long lngMoveFile = MoveFile("C:\test.exe", My.Computer.FileSystem.SpecialDirectories.Desktop & Application.ExecutablePath)

我希望我的代码移动一个可执行文件到桌面，我希望应用程序找到当前文件名，因为我使用GetRandomFileName来更改文件名。我用过：

I want my code to move an executeable file to the desktop, and I want the application to find the current file name, because I use "GetRandomFileName" to change the filename. I used:

Application.ExecutablePath

为什么这么错？ 我试过的：

Why is that wrong? What I have tried:

Dim newName As String = String.Format("{0}.exe", Path.GetRandomFileName().Replace(".", "")) Dim oldName As String = "C:\j\WindowsApplication1.exe" If File.Exists(oldName) Then File.Move(oldName, newName) Dim lngMoveFile As Long lngMoveFile = MoveFile("C:\test.exe", My.Computer.FileSystem.SpecialDirectories.Desktop & Application.ExecutablePath)

推荐答案

没关系： lngMoveFile = MoveFile(My.Computer.FileSystem.SpecialDirectories.Desktop & "\" & IO.Path.GetFileName(Application.ExecutablePath), "C:\NAME.exe") 'paths of current and