用Directory.CreateDirectory即可创建文件夹：
我们提供的服务有：成都网站制作、网站设计、外贸网站建设、微信公众号开发、网站优化、网站认证、宜春ssl等。为上千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的宜春网站制作公司
' 建立目录
If Not Directory.Exists("C:\负屃\" TextBox1.Text) Then '检查文件夹是否存在
Directory.CreateDirectory("C:\负屃\" TextBox1.Text) '不存在，创建文件建夹
End If
你的例子是因为少了一个"\"引起的，正确的如下：
Dim fsotest As New FileSystemObject
If fsotest.FileExists("C:\负屃\" TextBox1.Text) = False Then
fsotest.CreateFolder("C:\负屃\" TextBox1.Text) '这里你少了一个\
End If
MsgBox("创建成功")
临时文件通常用于临时性的数据存储和操作，比如在存储用户数据、参数选择、会话信息、应用程序缓存等类型的信息。
为了在VB.NET中获取临时文件的文件名，我建议使用Path类的GetTempFileName方法，尽管创建临时文件的方法有很多种，但是最佳的方案是使用System.IO.Path，因为它可以在当前用户的临时目录中返回唯一的文件名，您可以使用该文件名命名的文件来存储临时信息。
需要注意的是，如果多次调用该方法，那么每次都会生成不同的文件名，即使您没有使用这些文件名。这样做是为了防止不同的应用软件之间的冲突。
在列表A的示例代码中，我定义了字符串变量sTempFileName，并将System.IO.Path.GetTempFileName方法的返回值赋值给该变量，这样我就拥有了一个可以使用的临时文件名，然后我创建一个FileStream对象——fsTemp，同时向系统发出请求来创建文件，这个临时文件使用的正是sTempFileName中所存储的文件名。文件创建完成之后，我就开始向文件中添加数据（例子中没有展示这部分代码），然后将这个文件关闭。
vb.net使用控件folderbrowserdialog1,在程序中:
'设置对话框中在树视图控件上显示的说明文本
me.folderbrowserdialog1.description
=
"请选择输出报表所在路径:"
'设置从其开始浏览的根文件夹
me.folderbrowserdialog1.selectedpath
=
"c:\"
if
me.folderbrowserdialog1.showdialog()
=
dialogresult.ok
then
'取得全路径（包含文件名）
reportpath1
=
system.io.path.getfullpath(me.folderbrowserdialog1.selectedpath)
'设定text显示文件名
txtreport1.text
=
reportpath1
setreportlist()
end
if
在setreportlist()中针对你所需要的文件进行操作等
举个例子：
先引入命名空间：
Imports
System.IOImports
System.Security.AccessControl
代码：
Dim
sec
As
DirectorySecurity
=
New
DirectorySecurityDim
rule
As
FileSystemAccessRule
=
New
FileSystemAccessRule("Administrator",
FileSystemRights.Delete,
AccessControlType.Allow)sec.AddAccessRule(rule)Directory.CreateDirectory("C:\test",
sec)
这段代码就是以
Administrator
帐户
在
C:\
创建
test
文件夹。
