㈠ VB中新建文件夹的命令
Subs()
pth="d: est"'新建文件夹所在的路径
fd="a"'新建文件夹名称
t=Dir(pth,vbDirectory)
Ift=""ThenMsgBox"路径不存在版！权":ExitSub
t=Dir(pth&""&fd,vbDirectory)
Ift<>""ThenMsgBox"文件夹已存在！":ExitSub
MkDirpth&""&fd
t=Dir(pth&""&fd,vbDirectory)
Ift<>""ThenMsgBox"文件夹创建成功！"
EndSub
㈡ VB.NET 创建文件夹
vb.net创建文件夹，首先判断需创建的文件夹目录下是否存在指定文件夹，如不存再进行创建
下面给出两种创建文件夹的方法
1：创建普通文件夹；2：创建文件夹赋予一些权限，例如创建的文件夹是否能删除，是否允许用户访问等
代码如下：
'首先引入命名空间
ImportsSystem.IO'提供用于创建、复制、删除、移动和打开文件的静态方法，并协助创建FileStream对象
ImportsSystem.Security.AccessControl'供的编程元素用来控制对可保护对象的访问,并审核针对这些对象执行的与安全有关的操作
'将创建过程写入自定义函数，便于后期重复调用，使代码简洁
FunctionCreateFile(ByValpathAsString，)AsString'path代表你创建的文件夹所在的路径和文件夹名，IsDirectorySecurity代表是否创建一些比较特殊的文件夹
Try
IfIsDirectorySecurity=TrueThen'创建特殊文件夹
DimsecAsNewDirectorySecurity
DimruleAsFileSystemAccessRule=NewFileSystemAccessRule("Administrator",FileSystemRights.Delete,AccessControlType.Allow)'创建文件夹规则这条语句指的是用Administrator账号创建能删除，能访问的文件夹
sec.AddAccessRule(rule)'将规则添加到需要创建的文件夹中
IfDirectory.Exists(path)=FalseThen'判断文件夹是否存在
Directory.CreateDirectory(path,sec)
Return"创建文件夹成功"
Else
Return"文件夹已经存在"
EndIf
Else'创建普通文件夹
IfDirectory.Exists(path)=FalseThen'判断文件夹是否存在
Directory.CreateDirectory(path)
Return"创建文件夹成功"
Else
Return"文件夹已经存在"
EndIf
EndIf
CatchexAsException
Returnex.Message'创建文件夹异常时返回异常原因
EndTry
EndFunction
'调用示例
=CreateFile("C:abc",True)
㈢ VB怎么才能在某个地方生成一个文件或文件夹
'vb有mkdir的，他隶属filesystem，功能是创建一个文件夹及目录
dim
fixx
fixx
=
"c:\"
&
replace(now,
":",
".",
,
,
vbtextcompare)
mkdir
fixx
'
在c盘根目录下生成以年月日时分秒为文件名的文件夹
'我试过了，可以的！