两个问题（附源码）

Question

可能是你的文件路径的计算有错误，，，看不清，
不过CopyFile函数没有用错，参数为False是可以覆盖已经存在的文件的。
你可以加几个Label控件来显示文件路径以测试是不是文件路径计算有错误

Answer 1

1:
自己调试，这么懒惰？
2：
能够上CSDN就表明你的系统有Flash的OCX，以前的CSDN的广告是Flash的。你只要Import ActiveX Control，慢慢找即可。