vbVB4第8章幻灯片.pptxVIP

第八章 数据文件 8.1 数据文件概述8.2 访问文件8.3 综合应用 8.4 自主学习——随机文件 8.1 数据文件概述 文件：存储在外存上的用文件名标识的数据的集合。优点：可以长期保存 。一、引例8.1—学生信息处理程序 Structure StudTypeDim No As String * 4Dim Name As String * 8Dim Sex As String * 1Dim Score As IntegerEnd StructureDim Students(99) As StudType方案1：数据存储在数组Students,退出系统或关机,数据丢失。方案2：数据存储在文件中，可长期保存。二、文件分类1. 按文件内容分类：程序文件和数据文件 2. 按存储信息的形式分类：ASCII文件和二进制文件 整数123的两种存储形式 1 2 33. 按访问模式分类 ① 顺序文件 VB中，顺序文件本质上是文本文件，具有行结构。 顺序文件要求按顺序进行读写，记录不定长。 ② 随机文件 所有记录的长度都一样，可以根据记录号可以随机地读写任意一条记录 。 ③ 二进制文件 由一系列字节所组成，没有什么格式 。若每一个字节看作是一条记录，则二进制文件成了随机文件。 三、文件访问流程 打开文件时，系统为文件在内存中开辟了文件缓冲区，每一个文件缓冲区都有一个编号，称为文件号，文件号就代表文件，对文件的所有操作都是通过文件号进行的,文件号可以直接指定,可以使用FreeFile()获得。一、顺序文件① 按顺序进行读写，不可以跳。② 写操作时，各种类型的数据自动转换成字符串后写入文件。③ 读顺序文件时，可以按原来的数据类型读， 可以一行一行地读或一个字符一个字符地读。 1. 打开文件CH7-9/V3j08-01.VBP例CH7-9/V3j08-01.VBP8.1 形式：Open 文件名 For 模式 As [#]文件号 模式：Output 进行写操作，若文件已存在，则原有内容被清楚Input 进行读操作， Append 在末尾追加记录 。文件号 ：1～511之间，也可通过FreeFile()函数获得 。文件名：可以为字符串常量，也可以是字符变量。Open C:\VB\Scores.dat For Output AS #1FileNo = FreeFile() Open C:\VB\Scores.dat For Output AS FileNo 8.2 访问文件2. 写操作 (1) Write Write #文件号，[输出列表] Write在数据项之间插入“,”并给字符串加上双引号。 例如 Write #1, “One”, “Two”, 123写入到文件后格式：One,Two,123 (2) PrintPrint #文件号，[输出列表] Print #语句功能与Write 基本相同，区别在于字符串不加双引号，数据之间没有“,”。 例如，Print#1，One，Two，123写入到文件后格式：OneTwo 1233. 读操作 (1) Input #从打开的顺序文件中读出数据并将数据赋给变量。 Input #文件号，变量列表 (2) LineInput 读出一行数据 LineInput #文件号, 字符串变量说明：读出的数据中不包含回车换行符 。(3) EOF (文件号)测试文件指针是否到文件末尾。(4) LOF (文件号)测试文件的长度(文件在内存占的字节数)。4. 关闭文件 Close #文件号1, #文件号2,……, #文件号n 例：Close(1)关闭1号文件。 Close #1，#2，#3 关闭1号、2号、3号文件 ！若省略文件号，关闭所有文件 ../File-8-12.vbp例../File-8-12.vbp8.2 完成例8.1二、二进制文件1. 打开文件 形式: Open 文件名 For Binary As #文件号2. 写操作 Put [#]文件号，[位置]，变量名 Put [#]文件号, ,变量名 ‘当前位置处写入一个字节 3. 读操作 Get [#]文件号，[位置]，变量名 Get [#]文件号, ,变量名 ‘当前位置处读出一个字节 ../8-3.vbp例../8-3.vbp8.3 编写一个文件复制程序Dim char As ByteDim FileNum1 as Integer, FileNum2 as IntegerFileNum1 = FreeFile()Open C:\Student.dat For Binary As # FileNum1 打开源文件 Fi