vb数据⽂件
⽂章⽬录
1概念
变量或数组中的数据不能被长期保存
⽂件或数据库中的数据可以被长期保存
⽂件
存储在外存上的⽂件名标识的集合
⽂件按内容分可分为程序（exe）⽂件和数据⽂件（doc）
存储信息的⽅式可分为ASCII⽂件和⼆进制⽂件
ASCII⼜称⽂本⽂件
⽂件缓冲区
⽂件打开后，在内存中开辟的的数据存储区域
写操作将数据写⼊缓冲区，读操作将数据从缓冲区读出到变量数组中，缓冲区到⽂件是操作系统负责的，处理结束后要关闭⽂件，有可能数据写到缓冲区没有送到⽂件中。
2⽂件访问
顺序⽂件特点：
访问规则：按顺序进⾏访问
写⽂件：各种类型的数据变为字符串类型写⼊
本质来说顺序⽂件是ASCII⽂件，可以⽤记事本打开
读⽂件：按原本数据类型读出，按⽂本⽂件进⾏处理，⼀⾏⼀⾏读或⼀个字符⼀个字符读
2.1⽂件打开
FileOpen(⽂件号,⽂件名，模式)
模式： OpenMode.Output写操作
OpenMode.Input读操作
OpenMode.Append 在末尾追加记录
2.2写⽂件
Print函数PrintLine函数
Print(⽂件号，[输出列表])
PrintLine (⽂件号，[输出列表])
PrintLine相⽐Print输出数据后在输出回车换⾏符
按标准格式输出⼀个区14个字符只能写⼀个数据，数据间没逗号，字符串也不⽤双引号
Write和WriteLine
Write(⽂件号，[输出列表])
WriteLine (⽂件号，[输出列表])
WriteLine输出数据后再输出回车换⾏符（vbCrLf）
以紧凑格式输出数据：
数据项之间插⼊“,”给字符串加上双引号，数值数据没有双引号3关闭⽂件
FileClose([⽂件号])
要关闭⽂件，否则数据可能会丢失，因为数据在缓冲区
省略⽂件号，关闭所有已经打开的⽂件
例如：FileClose(1) 关闭1号⽂件
FileClose() 关闭所有⽂件
4实验案例
建⽴如图ui
代码如下
Class MainWindow
Private Sub Button_Click(sender As Object, e As RoutedEventArgs)
FileOpen(1, "c:\", OpenMode.Append)
PrintLine(1, Textbox1.Text)
PrintLine(1,"a","b","c")
FileClose(1)
End Sub
Private Sub _1_Click(sender As Object, e As RoutedEventArgs)Handles _1.Click
FileOpen(1, "c:\", OpenMode.Append)
WriteLine(1, Textbox1.Text)
WriteLine(1,"a","b","c")
FileClose(1)
End Sub
writeline特点Private Sub Button_Click_1(sender As Object, e As RoutedEventArgs)
Dim Str As String
Textbox2.Text=""
FileOpen(1, "c:\", OpenMode.Input)
Do While Not EOF(1)
Str= LineInput(1)
Textbox2.Text+=Str+ vbCrLf
Loop
End Sub
End Class
5 实验效果
运⾏程序在⽂本框Textbox1输⼊如上数据
在c盘⽣成⽂件，内容如下。前两⾏为通过textbox1输出，后⾯来验证了每个区⼗四个字符
按下 writeline，效果如下，字符串双引号标注，字符键有逗号
按下input输出，效果如下，输⼊⽂件内容。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。