Visual Basic程序设计简明教程王晓东电子教案 第9章.ppt

第9章 文件 本章内容： ? 概述 ? 文件打开与关闭 ? 文件读写 ? 文件操作 ? 文件系统控件 9.1 概述 顺序文件： 顺序文件一般是普通的文本文件，其所有数据都以字符串的形式存储。 顺序文件的一行数据就是一条记录，记录的长度不固定，记录之间以换行符予以分隔。顺序文件的记录是顺序存储的，而且只提供第一条记录的存储位置。 顺序文件的访问应采取顺序存取方式，例如查找某一个数据只能从文件的头部开始，一条一条地顺序读取记录，直至找到所要查找的记录为止。 随机文件： 随机文件由相同长度的记录集合组成，每一条记录有一个唯一的记录号。 随机文件的访问可以采取随机存取方式，直接读取某一条记录。只要指定记录号，就能够快速找到该条记录在文件中的位置，然后进行相应的操作。 9.2 文件打开与关闭 对磁盘文件的操作，主要有打开、读、写、关闭和删除等等。 对文件操作时，必须遵循“先打开，后读写，最后关闭”的原则。 9.2 文件打开与关闭——文件打开 （3）存取类型位于关键字Access之后，用来指定所访问文件的类型。 （4）锁定只在网络或者多任务环境中使用，其作用是限制其他用户或者进程对已打开的文件进行读写操作。 （5）文件号是一个整型表达式，该参数是必选项，取值范围在1~511之间。在执行Open语句时，系统自动为打开的文件和文件号之间建立关联。此后文件号就代表打开的文件，在程序中对该文件的操作都要借助于文件号。 （6）记录长度是一个整型表达式，其取值不能超过32767。对于顺序文件，该参数是指缓冲区的字符数，默认值是512；对于随机文件，该参数是指记录的长度，默认值是128。 9.2 文件打开与关闭——文件关闭 VB语言为文件关闭提供Close语句，其格式为： Close[[#]文件号][,[#]文件号…] 说明：如果省略文件号，则系统会将程序中所有已经打开的文件全部关闭。 例如关闭1号文件和2号文件，可以写为： Close #1,#2 9.3 文件读写——顺序文件 1．Print语句 Print语句用于将格式化的数据写入顺序文件，其格式为： Print #文件号,[表达式列表][;|,] 说明： （1）Print语句的格式与Print方法十分相似，其差别在于Print语句增加了一个文件号参数。Print语句输出的对象是文件，而Print方法输出的对象则是窗体、图片框和打印机。 （2）表达式列表列出向文件写入的信息，它的用法与Print方法相同。该参数是可选项，如果被省略，则表示向文件写入一个空行。 （3）如果用分号（;）分隔表达式列表中的数据项，按照紧凑格式写入数据；如果用逗号（,）分隔数据项，按照标准格式写入数据。 （4）对于字符串数据，如果其中含有逗号、分号、空格或者换行符，则应该先给字符串加上双引号（“”），然后写入文件。 例9.1 输入学生信息，并写入到文件test01.txt中 Private Sub Command1_Click() Dim n As Integer, i As Integer, name As String, age% n = Val(Text1.Text) Open d:\test01.txt For Output As #1 打开文件 For i = 1 To n name = InputBox(请输入第 i 个学生的姓名) age = InputBox(请输入第 i 个学生的年龄) Print #1, name; age 向文件写入学生的姓名和年龄 Next i Close #1 关闭文件 End Sub 2．Write语句 Write语句也能够将数据写入顺序文件，其格式为： Write #文件号,[输出列表] 说明： （1）输出列表列出向文件写入的信息，其中的各个数据项之间用逗号（,）分隔。 （2）Write语句的功能与Print语句基本相同。其差别在于Write语句写入的数据在文件中按照紧凑格式存放，而且自动在数据之间插入逗号（,），并给字符串加上双引号。 例9.2 追加信息到文件test01.txt Private Sub Command1_Click() Dim n As Integer, i As Integer, name As String, age% n = Val(Text1.Text) Open d:\test01.txt For Append As #1 打开文件 For i = 1 To n name = InputBox(请输入第 i 个学生的姓名