在VB(Visual Basic)中,`Copy` 方法用于将指定的文件或文件夹从某位置复制到另一位置。它属于 `FileSystemObject` 类,并且可以用于复制单个文件或整个文件夹。以下是 `Copy` 方法的基本用法:
复制单个文件
```vb
Dim fso As Object
Dim sourceFile As Object
Dim destinationFile As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set sourceFile = fso.GetFile("C:\path\to\source\file.txt")
Set destinationFile = fso.CreateTextFile("C:\path\to\destination\file.txt", True)
sourceFile.Copy destinationFile.Path
```
复制整个文件夹
```vb
Dim fso As Object
Dim sourceFolder As Object
Dim destinationFolder As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set sourceFolder = fso.GetFolder("C:\path\to\source\folder")
Set destinationFolder = fso.CreateFolder("C:\path\to\destination\folder")
sourceFolder.Copy destinationFolder.Path
```
参数说明:
`object`:必选项,应为 `File` 或 `Folder` 对象的名称。
`destination`:必选项,复制文件或文件夹的目标位置。不允许使用通配符。
`overwrite`:可选项,Boolean 值。如果覆盖现有文件或文件夹,则Boolean 值为 `True`(默认);否则为 `False`。
示例代码:
```vb
Dim fso As Object
Dim sourceFile As Object
Dim destinationFile As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set sourceFile = fso.GetFile("C:\path\to\source\file.txt")
Set destinationFile = fso.CreateTextFile("C:\path\to\destination\file.txt", True)
' 如果目标文件已存在,则覆盖它
destinationFile.Copy "C:\path\to\destination\file.txt", True
```
其他注意事项:
`Copy` 方法的结果与使用 `FileSystemObject.CopyFile` 或 `FileSystemObject.CopyFolder` 执行的操作完全相同。
`FileSystemObject.CopyFile` 或 `FileSystemObject.CopyFolder` 方法可以复制多个文件或文件夹,而 `Copy` 方法只能复制单个文件或文件夹。