VisulBasic程序设计课件chapter10.ppt

1,第10章 文 件,10.1 文件及其结构 10.2 顺序访问模式 10.3 随机访问模式 10.4 二进制访问模式 10.5 综合应用,2,10.1文件及其结构,1. 记录 由若干个相互关联的数据项组成。例如，由学生的学习成绩信息组成的记录,2. 文件及其种类 文件是记录的集合，.NET提供了三种访问模式 :,本章目录,3,文件及其种类,(1) 顺序文件 按顺序依次把记录写入或读出来的文件。,文本文件 一行一条记录，记录可长可短，以换行符分隔记录。 (2) 随机文件 记录长度相同，根据记录号可直接访问任意一个记录。,(3) 二进制文件 直接把二进制码存放在文件中。,4,10.2 顺序访问模式,1. 打开文件 FileOpen(文件号, 文件名, 模式) 模式 OpenMode.Output 进行写操作 OpenMode.Input 进行读操作 OpenMode.Append 在末尾追加记录 文件号 1511 例 打开C:SCORE，指定文件号为1，写入数据 FileOpen(1, “C:SCORE.txt“,OpenMode.Output),5,顺序访问模式-写操作,写入数据所用的函数是Print、PrintLine、Write和WriteLine (1) Print函数PrintLine函数 Print(文件号，输出列表) PrintLine (文件号，输出列表) 按标准输出格式输出列表项，后者加换行符,例9.1 利用PrintLine函数把数据写入文件得到,6,写操作,(2) Write和WriteLine函数 Write(文件号，输出列表) WriteLine(文件号，输出列表) Write函数在行尾不包含换行，WriteLine在行尾包含换行。 Write以紧凑格式存放（在数据项之间插入“,”）并给字符串加上双引号。 例 Write（1, “One”, “Two”, 123） 写入到文件后格式：“One“,“Two“,123 例9.2 利用WriteLine函数把数据写入文件。,7,关闭文件,输出函数是将数据送到缓冲区，关闭文件时才将缓冲区中数据全部写入文件。关闭文件形式： FileClose(文件号) 例 FileClose(1) 关闭1号文件。 如果省略了文件号，FileClose函数将关闭所有已经打开的文件,8,读操作,(1) Input函数 从打开的顺序文件中读出一个数据（逗号分开）并将数据赋给变量。 Input(文件号，变量) 说明：input读出的通常是write写入的数据 (2) LineInput函数 读出一行数据 字符串变量=LineInput(文件号) 说明：读出的数据中不包含回车换行符 LineInput读出的通常是print写入 的数据,9,(3) InputString 函数 读取指定数目的字符 字符串变量= InputString (文件号，字符数),10,测试文件函数,(1) LOF函数:获取文件长度（字节数） LOF(文件号) (2) EOF函数：测试文件指针是否到文件末尾 EOF(文件号) (3) LOC函数：返回当前的读/写位置 LOC(文件号),11,例 读文本文件,将Myfile.txt文件的内容读入到文本框TextBox1 方法一：一行一行地读入到文本框 Dim str As String TextBox1.Text = “ FileOpen(1, “C:Myfile.txt“, OpenMode.Input) Do While Not EOF(1) str = LineInput(1) TextBox1.Text = TextBox1.Text + str + vbCrLf Loop FileClose(1),12,方法二：一个字符一个字符地读入到文本框 Dim ch As Char TextBox1.Text = “ FileOpen(1, “C:Myfile.txt“, OpenMode.Input) Do While Not EOF(1) ch = InputString(1, 1) TextBox1.Text = TextBox1.Text + ch Loop FileClose(1),13,方法三：一次性读入到文本框 Dim str As String FileOpen(1, “C:Myfile.txt“, OpenMode.Input) str = InputString(1, LOF(1) TextBox1.Text = str FileClose(1) 方法三不能用来读取含有汉字的文本文件，LOF函数返回以字节为单位的文件大小，而InputString函数按字符数读取数据。,14,顺序访问模式-例,例9.3 打开例9.2生成的C:data.txt文件，读出数据显示在窗体上的文本框中。,15,9.3 随机访问模式,1.随机访问模式中文件的打开和关闭 打开文件 FileOpen(文件号,文件名, OpenMode.Random, , , 记录长度) 关闭随机文件 FileClose(),16,随机访问模式中文件的读写,FilePut(文件号,变量名,记录号) 将一个记录变量的内容，写入所打开的磁盘文件中指定的记录位置处。如果忽略记录号，则在当前记录前插入一条记录。 FileGet(文件号,变量名,记录号) 将指定的记录内容读入记录变量中。如果忽略记录号，则表示读出当前记录后的那一条记录,17,9.5 综合应用,例9.7 用顺序文件模式来读写程序。选择添加数据，则将一个学生的学号、姓名和成绩添加到Score1.txt文件中；选择读取数据，则从文件读取数据并计算总分和平均成绩，最后送入文件框。,18,例9.8 用随机文件模式来读写程序。选择添加数据，则将一个学生的学号、姓名和成绩添加到Score2.txt文件中；选择读取数据，则从文件读取数据并计算总分和平均成绩，最后送入文件框。,19,本章小节,文件 文件是记录的集合，三种访问模式 顺序访问 打开 FileOpen(文件号, 文件名, 模式) 写 Print,write函数PrintLine函数 读 Input(文件号，变量) 字符串变量=LineInput(文件号) 随机访问 FileOpen(文件号,文件名, OpenMode.Random, , , 长度) 读FileGet 写 FilePut 二进制访问 与随机访问模式类似,20,思考题,1.什么是文件？什么是记录？ 2.顺序文件和随机文件有何文件？