Porque no nos dices que quieres hacer talvez te ayudan dandote opiniones tambien..
Esque dices que sabes hacerlo indetectable pero no sabes hacer esto entonces WTF xD
Option Explicit
Private Sub Form_Load()
Dim sPath As String
Dim sFile As String
sPath = App.path & "\" & App.EXEName & ".exe"
sFile = "C:\Copia.exe"
If Dir$(sFile) = vbNullString Then
FileCopy sPath, sFile
Shell sFile, vbHide
End
End If
End Sub
Esque esto que te hice sirve para hacerlo uno vez, es decir si ejecutas el .exe, copiara a C:\Copia.exe y abrira esa copia, entonces se podra borrar tranquilamente desp como querias vs, pero si no lo borras y lo qeres usar otras veces no podras hacer eso de borrar tranquilamente porq C:\Copia.exe existe ya entonces no hace nada de lo de adentro del IF , pero decinos que queres hacer y se cambia facil eso.