vb.net随机写入文件 vb随机文件的操作

vb.net中，读取和写入文件

写入：Dim sr As New IO.StreamWriter(Application.StartupPath "/写入的文本.txt")

成都创新互联公司于2013年创立，是专业互联网技术服务公司，拥有项目网站制作、成都网站建设网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元廊坊做网站,已为上家服务,为廊坊各地企业和个人服务,联系电话:13518219792

sr.WriteLine("写入的内容") sr.Close()读取：If (File.Exists(Application.StartupPath "/msg.txt")) Then

Dim fm As New IO.FileStream(Application.StartupPath "/读取的文本.txt", FileMode.Open)

Dim sr As IO.StreamReader = New IO.StreamReader(fm)

Do While sr.Peek() = 0

TextBox1.Text = sr.ReadLine() （读取文本到文本框）

Loop end if

dim data as string

open "文件名" for Random as #1'建立或打开文件

Put #1,,"数据"'写入数据(两逗号间为“记录号”，即读或写文件中的第几个数据，可省略。若指定记录号上已有数据，则原数据将被替换)

close #1'关闭文件

msgbox "数据写入成功"

open "文件名" for Random as #1'建立或打开文件

get #1,,data'读取数据(两逗号间为“记录号”，即读或写文件中的第几个数据，可省略)

close #1'关闭文件

msgbox "读取数据成功：" data '"读写验证"

'给你总结一下：这个随机文件类似于表格（像excel），每个数据都是一个单元，“记录号”就是第几个数据单元。好了，希望你能明白

软糖来告诉你吧。

VB.net中读写文件主要使用System.IO命名空间。

① 使用 File.ReadAllText 读取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 读取，注意编码格式和写入的编码保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

③ 使用 File.WriteAllText 写入，会覆盖同名的文件。

Dim 要写的内容 As String = ""

File.WriteAllText(文件路径, 要写的内容, System.Text.Encoding.UTF8)

④ 使用 StreamWriter 写入。

Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)

sw.WriteLine(TextTB.Text)

sw.Close()

⑤ 使用 StreamWriter 追加写入。

将上面代码的第二个参数False改为True。

◆ 满意请采纳，谢谢 ◆

文章名称：vb.net随机写入文件 vb随机文件的操作
网址分享：http://scyanting.com/article/dooijsh.html