
正文
vb.net创建文件 vb 创建文件
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
VB.Net怎么创建文件
举个例子:
先引入命名空间:
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
文件夹。
相关问答
Q1: vb.net怎样制作安装包
打包过程vb.net创建文件:
1、打开自己已经创建好的VB.NET项目(一般一开始创建项目的时候创建的是Windows窗体应用程序)。
2、点“文件”--“新建项目”--“其他项目类型”--“安装部署”--“Visual Studio Installer”--“安装项目”vb.net创建文件,输入项目名称(此处命名为setup1)并点击“确定”。
3、执行完上一步,在解决方案下面会出现setup1项目。右击setup1项目--“添加”--“项目输出”。
4、在“添加项目输出组”中,选择“主输出”,然后单击“确定”。将自动添加所有依赖项。
5、在解决方案资源管理器中,右击安装项目---“添加”---“合并模块”。 把相关模块添加进来。
6、在文件系统选项卡中添加所需的应用程序图标等文件,并生成应用程序的桌面快捷方式,在快捷方式上右键选择属性,并在属性栏中的图标处选择应用程序快捷方式图标。(要在用户桌面和用户的“程序”菜单属性里将AlwaysCreate属性的值修改为True)。这样安装完程序后就可以看到桌面的图标了
7、关于应用程序图标的详细说明:
(1)点击“应用程序文件夹”并在右侧的列表中的“主输出来自。。”上右键然后点击“创建主输出来自。。的快捷方式”
(2)把生成的快捷方式复制到“用户桌面”,然后右键重命名为vb.net创建文件你想要在程序安装后显示的名字。
(3)重命名完成后在右侧的属性栏中点击图标设置为自己想要的图标,注意,需要先把图标文件ico加入到“应用程序文件夹”中。(ico的制作:先做好256*256的png文件,然后百度ico制作找到在线制作ico的网站,直接生成ico图标文件)
关于安装后的一些属性的设置:
Q2: vb.net 创建文件夹和删除文件夹
Private Sub btnRemovePath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRemovePath.Click
Try
' 先建立目录以便用于后续vb.net创建文件的删除示范。
If Not Directory.Exists("D:\网易") Then
Directory.CreateDirectory(" D:\网易 \Test1")
Directory.CreateDirectory(" D:\网易 \Test2")
Directory.CreateDirectory(" D:\网易 \Test3")
End If
' 删除子目录 Test1。
Directory.Delete(" D:\网易 \Test1", True)
' 删除子目录 Test2。
Dim myDirectoryInfo As New DirectoryInfo(" D:\网易 \Test2")
myDirectoryInfo.Delete(True)
' 将目录 C:\AlexDirDemo 及其以下vb.net创建文件的文件和子目录全数删除。
Directory.Delete(" D:\网易 ", True)
Catch ex As Exception
MessageBox.Show(ex.Message)
Exit Sub
End Try
' 启动 Windows 资源管理器。
Process.Start("explorer.exe", "D:\")
End Sub
Q3: VB.NET 创建文件夹
用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) '这里你少了一个\
End If
MsgBox("创建成功")
关于vb.net创建文件和vb 创建文件的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。







