[SOLUCIONADO] Ayuda pasar declaración de crypter vb6 a vb.net

Hola necesito ayuda estaba intentando pasar un crypter en vb6 a No tienes permitido ver los links. Registrarse o Entrar a mi cuenta y tengo problemas al pasar una declaración que es la siguiente:
Call FileCopy(App.Path & "\encrypt.dll", App.Path & "\Crypted.exe")
Como podría pasar eso a No tienes permitido ver los links. Registrarse o Entrar a mi cuenta? el App.Path da error...

Prueba :
Dim localizacion = System.Reflection.Assembly.GetExecutingAssembly().Location
Y para obtener el path en forma C:\....\
Dim path= system.io.path.getdirectoryname(localizacion)

A ver si funciona.

Rápido, sencillo y para toda la familia:

Dim srcfile = Application.StartupPath + "\encrypt.dll" 'Declaramos el source
Dim destfile = Application.StartupPath + "\Crypted.exe" 'Declaramos el destino
FileCopy(srcfile, destfile) 'Copiamos el source al destino

Básicamente utilizamos Application.StartupPath, este nos da un resultado de tipo string. Al cual debemos de concatenar con un back slash "\" el nombre del archivo que deseemos y que se encuentre en la misma ruta en la cual se ejecutó la aplicación.
Otra opción sería splitear el Application.Executablepath, cosa mucho mas tediosa que utilizar la opción descrita anteriormente.
Cualquier duda o cuestión estoy a tu libre disposición.
Un saludo!

Muchas gracias!