Ho provato a lavorare con un solo file, e il codice a sostituirlo con
codice:
My.Computer.FileSystem.CopyFile(    "C:\UserFiles\TestFiles\" & num & ".txt","C:\UserFiles\TestFiles2\" & num & ".txt", Microsoft.VisualBasic.FileIO.UIOption.AllDialogs,Microsoft.VisualBasic.FileIO.UICancelOption.DoNothing)
ma non va bene.