vb第11章.pptVIP

第11章 文件 引言 在前面各章的示例中，应用程序所处理的数据存储在变量或数组中，即数据只能保存在内存中，当退出应用程序时，数据将不能被保存下来。为了长期有效地使用数据，在程序设计中引入了文件的概念。使用文件可以将应用程序所需要的原始数据、处理的中间结果以及执行的最后结果以文件的形式保存起来，以便继续使用或打印输出。 11.1 文件的基本概念 文件：存储数据的基本单位。 文件的分类： 按文件的存储介质不同，可以将文件分为磁盘文件、磁带文件、打印文件等。 按文件的存储内容不同，可以将文件分为程序文件和数据文件。 按对文件文件的访问方式不同，可以将文件分为顺序文件、随机文件和二进制文件 1．数据文件的结构 数据文件用于保存程序运行时所用到的输入、输出数据或中间结果。 为了有效地存取数据，数据在文件中必须按一定的格式存放，Visual Basic的数据文件一般由一些记录组成。 数据文件示例—学生成绩表 2．数据文件的分类 顺序文件: 普通的纯文本文件。 查找数据必须按记录顺序进行。 不能同时进行读写操作。 随机文件: 以固定长度记录为单位进行存储。 可以按任意顺序访问其中的数据。 可以同时进行读写操作。 不能用字处理软件查看。 二进制文件: 以字节为单位进行访问。 不能用字处理软件查看。 11.2 顺序文件 顺序文件操作: 打开文件 读/写文件 关闭文件 11.2.1 顺序文件的打开和关闭 1. 顺序文件的打开 打开文件示例： 例1：在C盘Data文件夹下建立一个名为Student.dat的顺序文件： Open C:\Data\Student.dat For Output As #1 例2：打开当前文件夹下名为Salary.dat的顺序文件，以便从中读取数据-： Open Salary.dat For Input As #8 例3：打开C盘Data文件夹下名为Student.dat的文件，以便在文件尾添加数据，Open语句为： Open C:\Data\Student.dat For Append As 2 2．顺序文件的关闭 格式 ： 关闭文件示例： 例1：关闭文件号为1的文件： Close #1 例2：关闭文件号为1、2、3的文件： Close #1, 2, 3 文件号前的“#”号可以省略 例3：关闭所有文件： Close 11.2.2 顺序文件的读写 打开顺序文件之后，就可以对顺序文件进行读写操作了。 1．顺序文件的写操作 （1）Write #语句 【例11-1】建立一个新的学生成绩顺序文件，将输入的学生成绩添加到文件中。 代码设计： （2）Print #语句 2．顺序文件的读操作 格式： EOF函数 在读顺序文件的过程中，如果已到达文件结尾，则会终止输入，并产生一个错误。为了避免这种错误，可以使用EOF函数判断是否已读到了文件尾。 【例11-2】读取用例11-1生成的数据文件（用Write #语句生成），计算各学生的平均成绩，并显示各学生的学号、姓名、数学成绩、英语成绩和平均成绩。 代码设计： Private Sub Command1_Click() CommonDialog1.ShowOpen Open CommonDialog1.FileName For Input As #2 Text1.Text = Do While Not EOF(2) Input #2, num, nam, s1, s2 ave = (s1 + s2) / 2 Text1.Text = Text1.Text num _ nam Str(s1) Str(s2) _ Str(ave) vbCrlf Loop Close #2 End Sub 运行时，单击“读取数据”按钮，在打开的对话框中指定文件名，显示结果如图: 【例11-3】读取如下图所示格式的数据文件中的数据，显示在文本框中。 界面设计： 【例11-4】统计文件中字符串出现的次数。 首先用记事本直接创建一个具有两行（两条记录）的文本文件“a.txt” ，作为要读取的文件。如下图： 界面设计： 代码设计 【例11-5】读取例11-1生成的学生成绩文件，计算每个学生的平均成绩，计算每门课的平均