《Visual Basic程序设计实用教程 教学课件 ppt 作者 刘瑶 第8章 文件》由会员分享，可在线阅读，更多相关《Visual Basic程序设计实用教程 教学课件 ppt 作者 刘瑶 第8章 文件（38页珍藏版）》请在金锄头文库上搜索。
1、第8章 文件,本章的学习要点 文件的分类 文件操作语句和函数 顺序文件的读写 随机文件的读写与记录的操作 通用对话框控件的使用,第8章 文件,知识目标： 文件的结构和类型； 顺序文件的读写操作； 随机文件的读写操作； 通用对话框控件的特点。,第8章 文件,技能目标： 掌握文件的打开与关闭方式； 掌握顺序文件的读写方式； 了解随机文件的读写方式； 掌握通用对话框控件的使用。,任务1,任务1：理解文件的概念及分类 【任务目标】了解文件的结构和类型，熟悉不同类型文件数据的组织形式。,计算机的数据文件按数据的存放方式分为三种类型： 1. 顺序型文件 连续存放的文本数据。此文件中通常记录与记录之间的分界
2、符为回车符；记录中字段与字段之间的分界符为逗号。 2. 随机型文件 有固定记录结构长度的文本数据。随机文件的每一个记录都有固定的长度，每一个记录都有一个记录号，在存入数据时，只需指明是第几个记录号，就可以把数据存入制定位置。 二进制型文件 存储二进制数据。数据以二进制格式保存，存储单位为字节。,1. 文件概述,2. 顺序文件,1顺序文件的打开 顺序文件按行存储，依次将记录顺序存储，当读出某些数据时，需要从第一条记录开始读取数据，直到找到所需要的记录为止。 在对文件进行操作之前，必须打开文件，同时要通知操作系统对文件进行读操作还是写操作，将数据存到什么地方。 语法格式：,Open “文件名” F
3、or 模式 As # 文件号 len=记录长度,1）文件名：文件名可以是字符串常量也可以是字符串变量。 2）模式： OutPut：打开一个文件，对该文件进行写操作，即将数据写入磁盘文件。Output选项模式打开一个不存在的文件时，VB会在磁盘上创建一个新的顺序文件。文件打开后文件的指针位于文件开头，准备向文件写入数据。若磁盘上有同名文件则该文件将被覆盖。 Input：打开一个文件，对该文件进行读操作，即将数据从文件中读入内存。注：文件必须存在，否则将出现错误。 Append：打开一个文件，在该文件末尾追加记录。打开或创建一个新的顺序文件，文件打开后文件指针位于文件的末尾准备向文件的尾部追加数据
4、。若磁盘上没有该文件，则创建一个新的文件。,2. 顺序文件,3）文件号：文件号是一个介于1-511之间的整数，打开一个文件时需要指定一个文件号，这个文件号就代表该文件，直到文件关闭后这个号才可以被其他文件所使用，同时被打开的每个文件的文件号不能同。 例 ： 含义是：打开D: sj目录下的aaa文件供写入数据，文件号为# 1。 含义是：打开当前目录下的bbB.txt文件供读数据，文件号为# 2。,2 顺序文件,Open “D:sjaaa“ For Output As #1,Open “ bbB.txt“ For Input As #2,2. 顺序文件的关闭 结束各种读写操作后，必须将文件关闭，否
5、则会造成数据丢失。关闭文件的命令是Close语句。 语法格式： 说明： （1）文件号是指利用Open语句打开文件时指定的文件号。 （2）此语句可以同时关闭多个已打开的文件，用逗号分隔文件号。 （3）若省略文件号，表示关闭所有已经打开的文件,2 顺序文件,Close #文件号1,#文件号2,例 ： Close #1,#2,#3 关闭文件号分别为1、2、3的文件。 Close 关闭所有已打开的文件。,任务2、通信录,【任务目标】掌握顺序文件中数据的读写方法. 【引导案例】“通信录”的读取功能，读取文件中人员的联系方式。,3.顺序文件的写操作 以OutPut和Append模式打开的文件可以进行写操作
6、，对顺序文件能够进行写操作的语句有Print #和Write #两个，用来向已经打开的顺序文件写入数据。 1Print #语句 语法格式： 说明：此语句的功能和Print语句类似，不同的是，此处是将输出列表项写入到文件中。 （1）输出列表项可以是常量、变量或表达式，输出列表项多于一个时，各项之间可以用逗号或分号分隔，其含义与Print语句的紧凑格式和标准格式相同。 （2）在输出列表项中也可使用Spc(n)函数向文件中写n个空格，或使用Tab(n)函数指定其后的输出项从第n列输出。,1. 顺序文件的写操作,Print #文件号, 输出列表,2Write #语句 语法格式： Write #语句的功
7、能和Print #语句的功能基本相同，都是将输出项写入指定文件中，不同的是： （1）Write #语句在文件中的各个输出项都以紧缩格式输出，并自动在输出项之间插入逗号分隔。 （2）Write #语句为文件中的字符串加上双引号。,1. 顺序文件的写操作,Write #文件号, 输出列表,4. 顺序文件的读操作 可以使用Input #语句、Line Input #语句或者Input()函数从文件中读出（输入）数据。 与读文件操作有关的两个函数： 1Input #语句 语法格式： 说明：该语句作用是将从文件中读出的数据分别赋给指定的字符变量。变量个数多于一个时，用逗号分隔。,2 顺序文件读操作,LO
8、F(n)：返回某文件n的字节数。,EOF(n)：检查文件n是否到达文件尾。,Input #文件号,变量列表,2 顺序文件读操作,2. Line Input #语句 语法格式： 该语句从指定文件号的文件中读出一行数据并将其赋值给字符串变量。 注意： Line Input #语句与Input#语句类似，但Input#语句读取的是数据项，而Line Input #语句读取的是一行数据。 3. Input（）函数 语法格式： 该语句可以读取指定字符长度的数据。也可写为Input$（）。,Line Input #文件号,变量列表,Input（length，#）,3 随机文件,随机文件又称为记录文件，是由
9、固定长度的记录顺序排列而成，每个数据项称为一个字段。各记录的数据项数目相等，对应的数据项数据类型相同。 记录是读写随机文件的最小单位，可将文件指针定位在任意一条记录上进行读或写，便于文件的查询和修改。 1. 随机文件的打开与关闭 1）打开随机文件操作 语法格式： 其中，“记录长度”等于各字段长度之和，以字节为单位。如果省略“Len=记录长度”，则记录默认的长度为128个字节。,Open“文件名”For Random As #文件号 Len=记录长度,3 随机文件,2）关闭随机文件操作 语法格式： 与顺序文件类似，可以同时关闭多个已经打开的随机文件，或者关闭全部文件。,Close #文件号1 ，
10、#文件号2,Get #文件号，记录号，变量名,4 二进制文件,二进制文件的基本元素是字节，没有记录的概念，她存放的是数据的二进制的值。 二进制文件占用的外存空间小，使用文本编辑软件不能查看二进制文件的内容。该模式是最原始的文件类型，直接把二进制码存放在文件中，以字节数来定位数据，允许程序按所需的任何方式组织和访问数据，也允许对文件中各字节数据进行存取和访问。 1. 二进制文件的打开和关闭 1）打开二进制文件操作 语法格式： 打开或建立二进制文件要使用Binary方式，不用“Len=记录长度”限定记录长度。,Open “文件名”For Binary As #文件号,4 二进制文件,2）关闭二进制
11、文件操作 语法格式： 与关闭其他文件一样，使用Close语句可以关闭指定文件号的二进制文件。当文件号省略时，将关闭所有打开的文件。,Close #文件号1 ，#文件号2,5.任务实施,【实施步骤】演示“通信录”程序。 【案例讨论】 Write语句语法； Print语句的语法； 输入语句的区别。,任务3、 “我的记事本”,【任务目标】掌握自定义对话框和通用对话框的使用方法，能利用通用对话框编写简单的文本编辑软件。 【引导案例】我的记事本程序：为简单编辑器程序添加文件的打开、保存，颜色、字体选择等菜单项，并实现其功能。,通用对话框,VB6.0为用户提供了一组基于Windows标准的对话框，称为通用
12、对话框，即CommonDialog。包括“打开”对话框、“另存为”对话框、“颜色”对话框、“字体”对话框、“打印”对话框以及“帮助”对话框。 通用对话框不是标准控件，使用时必须先将该控件添加到工具箱里。将CommonDialog添加到工具箱里的步骤如下： 1选择“工程”下拉菜单中的“部件”子菜单，弹出“部件”对话框。 2在“部件”对话框列表中选择“Microsoft Common Dialog Control6.0”项目，确保其前方的复选框内出现“”。 3单击确定按钮。添加完成后工具箱里出现CommonDialog的图标。具体操作如图12-10 所示。,通用对话框,通用对话框常用的属性有名称属
13、性和Action属性等。系统默认的通用对话框名称为CommonDialog1、CommonDialog2。Action属性决定程序打开什么类型的对话框。具体Action属性、含义及对应的方法。,通用对话框,把CommonDialog控件添加到窗体后，就意味着上述各种标准对话框可以被使用了。当某一时刻需要用到某个对话框时，必须通过设置Action属性或VB6.0的方法才能使之显示在屏幕上。 例如要显示“打开”对话框，在程序中利用设置Action属性则对应语句如下： CommonDialog1.Action=1 也可在程序中用控件的方法完成对话框的显示。 CommonDialog1.ShowSav
14、e,通用对话框,1文件对话框 文件对话框包括“打开”和“另存为”对话框。使用“打开”、“另存为”对话框可以设置文件对话框的属性。文件对话框属性页中的属性和含义如表12-5所示。,例如： CommonDialog1.Fileter=”All Files(*.*)|*.*|位图(*.bmp)| *.bmp|” 设置对话框的过滤器 CommonDialog2.DialogTitle=”选择文件” 设置对话框的标题,其他对话框,1颜色对话框 使用“颜色”对话框可设置颜色属性，对应的Windows颜色对话框如图12-12 所示。其属性和含义如表12-6 所示。,其他对话框,例如： Commondialo
15、g1.Showcolor Form1.BackColor=CommonDialog1.Color 表示将用户在“颜色”对话框中设置的颜色作为窗体背景色。,其他对话框,2字体对话框 使用“字体”对话框可设置字体属性。其属性和含义如表12-7 所示。,其他对话框,例如： CommonDialog1.ShowFont Text1.FontName = CommonDialog1.Filename 表示将用户在“字体”对话框中设置的字体作为文本框的字体。,其他对话框,例 利用颜色对话框和字体对话框设置文本框中文字的颜色和字体。 在窗体上放置一个文本框，两个命令按钮和一个通用对话框，控件属性如表。,其他
16、对话框,其他对话框,Private Sub Command1_Click() CommonDialog1.ShowColor 显示颜色对话框 Text1.ForeColor = CommonDialog1.Color 颜色设置 End Sub Private Sub Command2_Click() CommonDialog1.ShowFont 显示字体对话框。 Text1.FontName = CommonDialog1.FileName 设置字体 Text1.FontSize = CommonDialog1.FontSize 设置字体大小 Text1.FontBold = CommonDialog1.FontBold 设置是否粗体 Text1.FontItalic = CommonDialog1.FontItalic 是否斜体 Text1.FontUnderline = CommonDialog1.FontUnderline 是否有下划线
