codice:
Private Sub Command1_Click() 
Filecopy "C:\WINDOWS\Desktop\prova\prova_01.txt", "C:\WINDOWS\Desktop\prova\pippo.txt" as String  
End Sub
togli la parte che ti ho segnato in rosso e le parentesi.