北京电大 Visual Basic程序设计 第5节 文件处理应用程序设计方法.ppt

（一）顺序文件 一般来说，在以下条件下使用顺序文件（顺序访问数据文件）： 不需要经常修改文件内容； 修改文件内容时，不需要跳跃文件内容位置； 只需要在文件末尾添加文件信息。 如果一个文件已经存在，则打开该文件，如果不存在，则建立该文件。 1.顺序文件的打开和关闭 1）打开 格式：Open 文件名 For 模式 As [#] 文件号 功能：打开或建立指定的文件。 说明： 1) 文件名是 所要打开的文件的名称，其中包含完整的路径名称。 2) 模式指文件的打开方式，可以使以下三者之一： Input:以读方式打开文件。 Output: 以写方式打开文件。 Append: 以追加方式打开文件。 3) 文件号是一个1~511之间的整数，同时被打开的每个文件的文件号不能相同。 例如： Open “A:\D1.Dat” For Input As #1 Open “A:\D2.Txt” For Output As #2 (2) 关闭顺序文件 格式：Close [[[#] 文件名]，[[#] 文件号]···] 说明： 1) 文件号是Open语句打开文件时指定的文件号。 2) Close 语句可以同时关闭多个已打开的文件。 例如 Close #1 Close #1,#2 Close 2. 顺序文件的写操作 以Output方式或Append方式打开顺序文件后，可以使用Print #语句或Write #语句向文件中写（输出）数据。 Print # 语句 格式：Print # 文件号，[输出项列表] 功能：将各输出项的值写入到指定的文件中。 例如：P130 (2) Write #语句 格式：Write # 文件号，[输出项列表] 功能：将各输出项的值写入到指定的文件中。 说明： Write #语句的功能与Print #语句基本相同，主要区别是： 1) Write #语句在各输出项之间自动插入逗号。 2) Write #语句为字符串加双引号。 3) Write #语句在将最后一个字符写入文件后会插入回车换行符，即Chr(13)+Chr(10) 例如：P130 对比Print #语句和Write #语句的结果，可以看到： （1）Print # 语句在输出项中，用逗号分各输出项，则可以按分区格式输出，而用Write #语句虽然也用逗号分各输出项，但是并不按分区格式输出，而是在输出项之间用逗号分隔，所以对于Write #语句而言，采用逗号分各输出项，还是分号分隔输出项，二者是没有差别的。 （2）Print #语句生成的数据文件，数据项之间没有引号；而Write #语句生成的数据文件，数据项自动地加上了引号。 3. 顺序文件的读 以Open···For Input As 方式打开顺序文件后，可以使用Input #语句、Line Input #语句或Input 函数从文件中读（输入）数据。 (1) Input # 语句 格式：Input # 文件号,变量列表 功能：从指定文件中读取数据并将其赋值给对应的变量。 说明： 1) 变量列表中的变量不能是数组或对象变量。 2) 变量各输多于一个是，中间用逗号分隔。 3) Input # 语句一般与Write #语句配合使用，也就是说，如果数据文件使用Write #写入生成的，那么应该用Input # 语句读取该数据文件。 例如 P131 (2) Line Input # 语句 格式： Line Input # 文件号,变量 功能：从指定文件中读出一行数据并将其赋值给字符串变量。 说明： Line Input # 语句一次从文件中读取一行数据，直到遇到回车符Char(13)或回车换行符Char(13)+Char(10)为止。 (2) Line Input # 语句一般与Print #配合使用。 例如：P132 (3) Input 函数 格式：Input 字符个数，[#] 文件号 功能：从指定文件中读取指定个数的字符。 说明：函数Input返回他所读出的所有字符，包括逗号、回车键、空白列、换行符、引号和前导空格等 （二）随机文件 其每条记录的长度相等，且拥有一个唯一的记录号 可以随机地访问任一指定的记录，且对记录的读写操作也是可以随意选择的