文件的概念分析.ppt

一、 文件的概念 文件：存储在外部介质上数据的集合。按名存取 1. 记录：由若干个相互关联的数据项组成。 磁盘文件是由数据记录组成 例如，由学生的学习成绩信息组成的记录： (1) 顺序文件 按顺序依次把记录写入文件或把记录读出来。 文本文件：一行一条记录（一项数据），记录可长可短，以“换行”字符为分隔符号。 (2) 随机文件 可以直接访问文件中的任意一个记录。 记录长度相同 根据记录号访问 顺序文件在程序中对文件的操作，通常按3个步骤进行： （一）顺序文件的打开和关闭 1、打开文件—— Open Open “文件名” For 模式 As [#]文件号 [Len=记录长度] (1) 模式： Output：写操作 Input：读操作 Append：追加到文件未尾 (2) 文件号：是个整数，其值范围是：1～511， (3) 记录长度：指定数据缓冲区的大小。 2、关闭文件—— Close （3种类型文件都适用） 格式： Close [文件号列表]文件号列表，如：#1, #2, #3，如果省略，则将关闭Open语句打开的所有活动文件。 例如： Close #1, #2, #3 Close （二） 顺序文件的读写操作 1、写操作 Print #文件号，[输出列表] (格式同以前) Open “d:\lsssss.txt For Output As #1 Print #1, One , txtTest; 123 ’txtTest文本框 Close #1 2. 读顺序文件 INPUT #文件号,变量列表 把读出的每个数据项分别存放到所对应的变量。 LINE INPUT #文件号,字符串变量 读一行到变量中，主要用来读取文本文件。 INPUT$(读取字符数, #文件号) 随意读取字符 3. 函数 LOF(文件号)：返回文件的长度(总字节数)。 EOF(文件号)：返回读写位置。 文件未尾时，EOF函数为True，否则为False。 例：读文本文件到文本框 假定文本框名称为txtTest，文件名为MYFILE.TXT。 方法1：一行一行读 txtTest.Text ＝ Open MYFILE.TXT For Input As #1 Do While Not EOF(1) Line Input #1, InputData txtTest.Text ＝ txtTest.Text + InputData+vbCrLf Loop Close #1 顺序文件（总结） 存储方式：一个数据接着一个数据的按序排列。 只提供了第一个记录的存储位置，其他存储的位置则无法获悉。 对文件内部进行修改，必须将整个文件读到内存中进行必要的操作，然后再写回文件。 此结构适用于不经常修改数据的存储，并且这种结构占用的磁盘空间较少。 一、固定大小的数组 例：打印输出杨辉三角 Dim a(1 To 5, 1 To 5) As Integer For i = 1 To 5 a(i, i) = 1: a(i, 1) = 1 Next i For i = 3 To 5 For j = 2 To i-1 a(i, j) = a(i - 1, j - 1) + a(i - 1, j) Next j Next i 1 4 6 4 1 0 1 3 3 1 0 0 1 2 1 0 0 0 1 1 0 0 0 0 1 For i = 1 To 5 Next i Print Tab(20 - 3 * i); For j = 1 To i Print a(i, j); Spc(3); Next j Print * 总分 物理成绩 语文成绩 数学成绩 姓名 学号 数据项 2. 文件及其种类——文件是记录的集合 按存取方式及组成结构分类： 顺序文件、随机文件、二进制文件 文件结束标志 记录n …… 记录2 记录1 #n 记录n …… #2 记录2 #1 记录1 打开文件 读出或写入 关闭文件 例如： OPEN C:\TEMP\A.TXT FOR Input AS #1 OPEN C:\TEMP\B.TXT FOR Output AS #2 OPEN C:\TEMP\C.TXT FOR Append AS #3 结果 例1 回车换行 相当于chr(13)+chr(1