这是把当前目录下的132.exe复制到d:\program\123
这是把当前目录下的132.exe复制到d:\program\123
怎么让他把123.exe复制到TEXT1显示的目录？
参考答案:Private Sub Command1_Click()
Dim SourceFile, DestinationFile
SourceFile = App.Path + "\123.exe"
DestinationFile = text1 & "\123.exe"
FileCopy SourceFile, DestinationFile
End Sub