高分请教！一个新手的焦急等待！

Question

FileCopy 语句
      复制一个文件。语法FileCopy source, destinationFileCopy 语句的语法含有以下这些命名参数：部分 描述 
source 必要参数。字符串表达式，用来表示要被复制的文件名。source 可以包含目录或文件夹、以及驱动器。 
destination 必要参数。字符串表达式，用来指定要复制的目地文件名。destination 可以包含目录或文件夹、以及驱动器。 
说明如果想要对一个已打开的文件使用 FileCopy 语句，则会产生错误。FileCopy 语句示例
本示例使用 FileCopy 语句来复制文件。示例中假设 SRCFILE 为含有数据的文件。Dim SourceFile, DestinationFile
SourceFile = "SRCFILE"   ' 指定源文件名。
DestinationFile = "DESTFILE"   ' 指定目的文件名。
FileCopy SourceFile, DestinationFile   ' 将源文件的内容复制到目的文件中。 
Kill 语句
      从磁盘中删除文件。语法Kill pathname必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。说明在 Microsoft Windows 中，Kill 支持多字符 (*) 和单字符 (?) 的统配符来指定多重文件。
Kill 语句示例
本示例使用 Kill 语句将磁盘中的文件删除。' 假设 TESTFILE是一数据文件。
Kill "TestFile"   ' 删除。' 将当前目录下所有 *.TXT 文件全部删除。
Kill "*.TXT"

Answer 1

同意zyl910(910：分儿，我来了！) (L2002) 。

Answer 2

调用API函数 Public Declare Function SHFileOperation Lib "shell32.dll" Alias " SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long

Answer 3

三种方法：
1、FILECOPY，KILL
2、API：SHFILEOPERATION
3、FSO对象，工程-》引用：Microsoft Scripting Runtime

Answer 4

本人急切的等待一个能COPY整个文件夹的函数！

Answer 5

如何复制整个目录
Dim SHFileOp As SHFILEOPSTRUCT　SHFileOp.wFunc = FO_COPYSHFileOp.pFrom = "c:\temp\*.*"SHFileOp.pTo = "c:\temp2\*.*"SHFileOp.fFlags = FOF_ALLOWUNDO + FOF_NOCONFIRMMKDIRCall SHFileOperation(SHFileOp)