Visual Basic - Copiar fichero

Hola Colegas:
Tengo que hacer que un ejecutable en VB se copie así mismo a una dirección determinada, es decir que despues de ejecutarse el programa oprima un botón y me copie el mismo a una dirección determinada.
No hallo la forma de solocionar esto.
Saludos.

Private Sub Command1_Click()
On Error Resume Next
FileCopy App.Path & "\" & App.EXEName & ".exe", "C:\" & App.EXEName & ".exe"
End Sub

Mira, yo tengo un programa hecho en VB, lo que yo quiero es cuando este programa se este ejecutando que se copie así mismo a otra dirección.
Saludos y Gracias.

La opción que te dió Hely es correcta, obviamente

Hola Mundo ! !
Especulemos un poco... Que estas haciendo a pillin... ah.. un virusillo.je je je ... por que. Que programa necesita autocopiarse ??.
Bien suponiendo que estes programando un virusillo te enfrentaras a estos problemillas....
1. Como haras que se autoinicie o que el sistema operativo lo ejecute al iniciarse ??? Solucion escribiendolo en el registro del sistema.
2.suponiendo que hagas males, deberias programar tu virusillo para que se autodestruya .. Solucion crea un *.bat y luego le das shellexecute.
3.Evitaras me imagino que el administrador de tareas te saque o dicho en terminos de programacion te corte el Thread. Solucion en el eento queryunload le das shellexecute para volver a cargarlo....ojo revisar IF APP. previnstance = false.
4.LA REPRODUCCION es la clave "has p'a los virus" Como ???? por mail, o solo por disketes, o tal ves atoda una Lan....

Bueno suerte de todas formas