vb復制目錄下所有文件

A. VB復制文件夾中文件

這個很復簡單：
比如把制C:\aa目錄中所有文件復制到D:\aa中，只要一行代碼

Shell "x C:\aa D:\aa\ /e /c /y", 0

/E 復制目錄和子目錄，包括空的
/C 即使有錯誤，也繼續復制
/Y 禁止提示以確認改寫文件
後面加0表示以隱藏方式運行

加的這些參數都是為了隱蔽性和自動性加的
目標文件夾可以不用先創建，它會自動創建
要記得目標文件夾後面要加\，請參照上面的代碼

B. VB怎麼用file復制文件夾

VB復制文件夾使用源CopyFolder方法實現。

CopyFolder 方法

描述

從一個地方遞歸地復制一個文件夾到另一個地方。

語法

object.CopyFolder source, destination[,
overwrite]

PrivateSubCommand1_Click()
CreateObject("scripting.filesystemobject").folder"c:ProgramFiles","D:ProgramFiles"
EndSub

C. VB.NET2010 如何復制指定目錄下按類型的所有文件到另一文件夾 復制後再刪除原來的文件

這段代碼的問題是：
首先for each循環在files里查找文件對象，但是f變數聲明為string了，無法讓它獲取對象；
然後file.的變數file沒有任何聲明，也沒有初始化賦值等；
最後，整個for each循環里查找集合files的文件，由於初始化的循環計數器仍然按照最初設定的文件數目向後遞增（文件地址），但是實際文件刪除一部分，後續的文件位置就不能跟循環計數指針匹配了，所以默認為查找不到文件，將會報錯。一般的做法時把復制和刪除分別放在2次循環里，第一次只復制文件，第二次才去刪除。

D. VB怎樣復制文件夾（包括裡面的文件）

給你一個列子
sourcePath 為源文件地址
targetPath 存放文件的地址

'復制文件夾到指定位置
Function CopyDir(ByVal sourcePath As String, ByVal targetPath As String) As Boolean
Try
'檢查目標目錄是否以目錄分隔符結束，不是則添加
If Microsoft.VisualBasic.Right(targetPath, 1) <> "" Then targetPath += System.IO.Path.DirectorySeparatorChar
'判斷目標目錄是否存在，不存在則新建
If Not Directory.Exists(targetPath) Then Directory.CreateDirectory(targetPath)
'得到源目錄的文件列表，該文件裡面是包含文件以及目錄路徑的一個數組
Dim fileList As String() = Directory.GetFileSystemEntries(sourcePath)

'遍歷所有的文件和目錄
For Each filepath As String In fileList
'目錄處理，遞歸
If (Directory.Exists(filepath)) Then
CopyDir(filepath, targetPath + Path.GetFileName(filepath))
Else
'復制文件
File.Copy(filepath, targetPath + Path.GetFileName(filepath), True)
End If
Next
Return True
Catch ex As Exception
Return False
End Try
End Function
希望對你有所幫助·····

E. 怎樣用vb 把程序目錄下文件夾內的文件復制到C盤根目錄下

可用file語句：
FileCopy
source,
destination
source要被復制的文件名，destination目地文件名
如程序路徑下的文件「123.txt"，拷到c盤後名稱不變，這樣：
file
app.path
+"\123.txt"
"c:\123.txt"
即可