VB文件调用方法和步骤

Private Sub Command1_Click()

FileName = Dir("C:\ ", vbDirectory + vbReadOnly + vbHidden + vbSystem + vbNormal)

Do While Not FileName = ""

FileCopy "c:\" + FileName, "d:\" + FileName
FileName = Dir()
Loop

End Sub
==========================================
以上是复制C:\的所有文件到D:\，不含子文件夹

如果连子文件夹也要的话，用XCOPY命令：

shell "xcopy c:\ d:\"

FileCopy 语句

复制一个文件。

语法

FileCopy source, destination

FileCopy 语句的语法含有以下这些命名参数：

部分 描述
source 必要参数。字符串表达式，用来表示要被复制的文件名。source 可以包含目录或文件夹、以及驱动器。
destination 必要参数。字符串表达式，用来指定要复制的目地文件名。destination 可以包含目录或文件夹、以及驱动器。

说明

如果想要对一个已打开的文件使用 FileCopy 语句，则会产生错误。
goodluck

FileCopy "C:\aaa.txt", "D:\aaa.txt"

就是把c盘的文件aaa.txt复制到的d盘

FileCopy "C:\a\1.txt", &