在现有的目录下创建一个文件夹

[qqyoya]

Private Sub Command6_Click()

With CommonDialog3
 .Filter = "CSV文件(*.csv)|*.csv "
.InitDir = "D:\"
.flags = cdlOFNOverwritePrompt
.ShowSave


End With
End Sub

在D盘目录下创建一个新的文件夹

[现在还是人类]

Mkdir "D:\新建文件夹"

[赵4老师]

shell "md d:\abc\bbc\ccd",vbHide

[clear_zero]

可以用filesystemobject，这样可读性强

[qqyoya]

[Quote=引用 1 楼 的回复:]

Mkdir "D:\新建文件夹"
[/Quote]
我想在那段代码里面加入一段，不过你这个代码加入貌似不行啊

[现在还是人类]

[Quote=引用 2 楼 的回复:]

引用 1 楼 的回复:

Mkdir "D:\新建文件夹"

我想在那段代码里面加入一段，不过你这个代码加入貌似不行啊
[/Quote]
你应该先学好DOS命令的用法

[王二.麻子]

[Quote=引用 2 楼 的回复:]

引用 1 楼 的回复:

Mkdir "D:\新建文件夹"

我想在那段代码里面加入一段，不过你这个代码加入貌似不行啊
[/Quote]
有什么貌似不行的?mkdir一级一级的建目录
a$="d:\abc"
mkdir a$
a$="d:\abc\bbc"
mkdir a$
a$="d:\abc\bbc\ccd"
mkdir a$

[yesxihuan]

学习命令中！

[东方之珠]

mkdir可以创建多级文件夹。写法如下：

Shell ("cmd /c "" mkdir c:\1\2\3\4\5\6\7\8\9""")