vb.net建立文件 vb建立文件夹

vb.net创建bat文件Imports System.IO
Imports System.Diagnostics
Imports System.Windows.Forms
Class Form1
Inherits Form
Private filename As String = "abc.bat"
Private bat As String = "@echo off"vbCrvbLf"dir"vbCrvbLf"pause"vbCrvbLf"exit"vbCrvbLf
Private Sub New()
Dim btn As New Button()
btn.Parent = Me
btn.Text = "Run bat"
AddHandler btn.Click, Sub() Process.Start(filename)
End Sub
Protected Overrides Sub OnLoad(e As EventArgs)
File.WriteAllText(filename, bat)
MyBase.OnLoad(e)
【vb.net建立文件 vb建立文件夹】End Sub
Protected Overrides Sub OnClosed(e As EventArgs)
File.Delete(filename)
MyBase.OnClosed(e)
End Sub
STAThread _
Public Shared Sub Main()
Application.Run(New Form1())
End Sub
End Class
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
vb.net不能在c盘建立txt文件是的 。vb.net不能在c盘建立txt文件是由于其格式不支持所导致的,通过更换文件格式即可解决 。c盘通常下是系统盘,也就是主要存放安装操作系统和软件的分区盘 。
VB.NET 创建文件夹用Directory.CreateDirectory即可创建文件夹vb.net建立文件:
' 建立目录
If Not Directory.Exists("C:\负屃\"TextBox1.Text) Then '检查文件夹是否存在
Directory.CreateDirectory("C:\负屃\"TextBox1.Text)'不存在vb.net建立文件 , 创建文件建夹
End If
vb.net建立文件你的例子是因为少了一个"\"引起的vb.net建立文件 , 正确的如下:
Dim fsotest As New FileSystemObject
If fsotest.FileExists("C:\负屃\"TextBox1.Text) = False Then
fsotest.CreateFolder("C:\负屃\"TextBox1.Text) '这里vb.net建立文件你少了一个\
End If
MsgBox("创建成功")
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
文件夹 。
vb.net建立文件的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vb建立文件夹、vb.net建立文件的信息别忘了在本站进行查找喔 。

    推荐阅读