举个例子:
先引入命名空间:
Imports
System.IOImports
System.Security.AccessControl
代码:
Dim
sec
As
DirectorySecurity
=
New
DirectorySecurityDim
rule
FileSystemAccessRule
FileSystemAccessRule("Administrator",
FileSystemRights.Delete,
AccessControlType.Allow)sec.AddAccessRule(rule)Directory.CreateDirectory("C:\test",
sec)
这段代码就是以
Administrator
帐户
在
C:\
创建
test
文件夹.
VB.NET打开二进制文件用fileopen完成,打开二进制文件的形式为:openmode.binary
读取二进制文件用的是fileget方法,写入二进制文件用的是fileput方法.
应用示例:将一批随机数保存在一个dat文件中,然后再将其提取到文本框中.
二进制文件的读写一批随机数的存取,程序为:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x, i, fn As Integer
Dim s As String = ""
fn = FreeFile()
FileOpen(fn, "d:\data.dat", OpenMode.Binary)
x = Int(Rnd() * 100)
s = s + Str(x)
FilePut(fn, x)
Next
FileClose(fn)
TextBox1.Text = s
End Sub
Dim x, fn As Integer
Do While Not EOF(fn)
FileGet(fn, x)
s = s + Str(x) + " "
Loop
在网上收到一些关于文件操作的列子,现在和大家分享一下,以下的示例代码将向您展示如何使用VB.NET FileInfo来拷贝、移动和删除文件,以及如何使用DirectoryInfo来移动和删除文件夹.(注意:为了运行这些示例,您需要将这条语句:Imports System.IO,添加到您的表单或模块的最顶部.)
保存文件的步骤为:
关闭流,特别是写入流
关闭并保存文件
示例代码如下:
Imports?System.Windows.Forms
Imports?System.IO
Imports?System.Text
Sub?SaveFileDemo()
'打开文件.如果文件不存在则创建新的文件
Dim?myFile?As?New?IO.FileStream("d:\data.txt",?_
?FileMode.OpenOrCreate,?_
?FileAccess.Write)
'在文件末尾添加一行?
Dim?tw?As?New?StreamWriter(myFile)
myFile.Seek(0,?SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End?Sub
用System.IO.File中的静态函数AppendText获得一个StreamWriter,然后用Write或WriteLine函数写入一些字符串,最后写入流并关闭它.
Dim sw As StreamWriter = System.IO.File.AppendText("textfile.txt")
Using sw
sw.Write("This is ") '仅写入字符串
sw.WriteLine("line 1.") '写入字符串并自动写入换行符
sw.Flush() '写入流
End Using '这里释放了资源
土嘎嘎的粉丝们大家好,请使用System.IO.Directory.EnumerateFiles()方法
Dim?XLS文件列表?As?IEnumerable(Of?string)
Dim?XLSX文件列表?As?IEnumerable(Of?string)
Dim?path?As?String?=?"D:\File\"
XLS文件列表?=?Directory.EnumerateFiles(path,?"*.xls",?SearchOption.TopDirectoryOnly)
XLSX文件列表?=?Directory.EnumerateFiles(path,?"*.xlsx",?SearchOption.TopDirectoryOnly)
以上就是土嘎嘎小编为大家整理的关于vb.netfile的信息相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!