Question

VB创建文件夹的问题。

使用VB如何创建一个指定文件夹，并在创建之前先判断，文件夹是否存在。
另，如何复制并移动文夹到指定的路径下。

Answer 1

晕死，楼上竟然写的是vb.net的代码，vb通常就是指vb6.0，
下面的给的源码
判断文件是否存在
If Dir("D:\3.txt") = "" Then MsgBox "文件不存在"
复制的话可以用FileCopy 路径1，路径2
FileCopy "D:\2.txt", "E:\2.txt"

Answer 2

由于不知道你用vb哪个版本，所以写了两个版本的。你自己选择一个吧。

Vb.net Code
'判断文件夹是否存在
Dim folderExists As Boolean
folderExists = My.Computer.FileSystem.DirectoryExists(Application.StartupPath & "\temp")

'创建文件夹
If Not folderExists Then
My.Computer.FileSystem.CreateDirectory(Application.StartupPath & "\temp")
End If

Vb6.0 Code
Dim fo As New FileSystemObject
If fo.FileExists("D:\新建文件夹1") Then
MsgBox ("文件夹已经存在，创建失败")
Else
fo.CreateFolder ("D:\新建文件夹1")
MsgBox ("文件夹“新建文件夹1” 已经被创建")
End If

如果以上回答有任何疑问，您可以选择继续追问。希望对您有用！