用Directory.CreateDirectory即可创建文件夹:
'?建立目录
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) '这里你少了一个\
MsgBox("创建成功")
两个方法:
①.、Visual Studio,新建项目,最后一个类别就是封装程序用的
我说的是左边的大类(VB.net,C#,J#那些的最后一个),不是右边的子类
但是LZ要注意,dotNet开发的程序,离开了FrameWork就基本不能运行,所以你拿到别的机器用,先确认安装了Framework!如果你用第一种方法,那么会自动监测系统是不是装了Framework;第二种方法的话,没有Framework程序是直接报错!
① 用.NET自己的封装工具封装(不太好用)
'''?summary
'''?封装后的方法
'''?/summary
'''?param?name="str"传入参数/param
'''?returns/returns
Public?Function?z(ByVal?str?As?String)
Dim?zz?As?String?=?Nothing
Dim?reg?As?New?Regex("Found?valid?key:\[ffffffffffff\][\d\D]*?--sector:\s*(\d◆)")
Dim?m?As?Match?=?reg.Match(str)
If?m.Success?Then
zz?=?m.Groups(1).ToString
Return?zz
End?Function
''调用示例
Dim?zz?As?String?=?z(Form1.prompt.Text)
以上就是土嘎嘎小编为大家整理的vb.net封装文件夹相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!