Visual Basic程序设计实训教程 教学课件 作者 陆剑锋 主编 俞伟新 颜忠胜 副主编 ch12 文件操作.pptVIP

第十二部分 文件操作 文件的打开、关闭与读写 文件操作函数与语句 使用文件编程 文件系统控件 §1 文件的打开、关闭与读写 文件分为三类：顺序访问文件、随机访问文件和二进制文件。 一、顺序访问文件 简称顺序文件，实际上是文本文件。写入到顺序文件中的任何类型的数据，都被转换为字符形式。 1.打开顺序文件 Open 文件名 For Input|Output|Append As [#]文件号 其中，文件名以字符串形式给出。 For后面的关键字决定文件的打开方式，如下页表格。 §1 文件的打开、关闭与读写 文件号代表被打开的文件，在范围1~511内的整数。文件号前的#可以省略。 打开文件后，对文件的操作均通过文件号进行。一个文件号被使用后，(除非相应的文件被关闭)不能再用于打开其它文件。 文件号不要求连续使用。 §1 文件的打开、关闭与读写 2.关闭文件 无论是何种文件，对文件的操作完成后都应关闭。 Close [[#]文件号1,[#]文件号2…] 可以一次关闭多个文件。不带参数的Close语句关闭所有已经打开的文件。 也可以用Reset语句关闭所有文件。 §1 文件的打开、关闭与读写 3.写顺序文件 向顺序文件中写数据之前，应使用Output或Append方式打开文件。 （1）Print#语句 Print#文件号,一个或多个参数 （2）Write#语句 Write#文件号,一个或多个参数 Write#语句与Print#语句的区别：前者输出到文件的数据项之前用逗号分隔；前者输出字符串时使用引号、日期时间或逻辑值用#作定界符。 §1 文件的打开、关闭与读写 如程序： Open c:\aa.txt For Output As #1 Print #1, Hello, 123.4, Date, True Print #1, Hello; 123.4; Date; True Write #1, Hello, 123.4, Date, True Write #1, Hello; 123.4; Date; True Close 的文件结果为： Hello 123.4 2005-2-3 True Hello 123.4 2005-2-3 True Hello,123.4,#2005-02-03#,#TRUE# Hello,123.4,#2005-02-03#,#TRUE# §1 文件的打开、关闭与读写 4.读顺序文件 读顺序文件之前必须先以Input方式打开文件。 （1）Line Input#语句 整行读入 Line Input#文件号,字符串变量 一次将文件中的一行作为一个字符串读入到变量，将本行中所有字符都作为字符串的组成部分(不包括回车换行)。 §1 文件的打开、关闭与读写 如，将上例文件中的四行整行读入： Dim S$ Open c:\aa.txt For Input As 1 For i = 1 To 4 Line Input #1, S Print S Next Close 运行结果如图： §1 文件的打开、关闭与读写 （2）Input#语句 Input#文件号,一个或多个变量 Input#语句一次可以读入一项或多项数据，依次赋给相应的变量，应注意变量的类型匹配问题。 因为Input#语句读取数据时能识别分隔符，故通常用于读取Write#语句写入的数据。 顺序文件的特点：无论是写入还是读取，都是一项一项进行的。每个打开的文件有一个文件指针，指针指向的位置就是下一次写或读的位置。一次读写结束后，文件指针会自动后移。刚打开的文件(不是Append方式)，其文件指针指向开头，而Append方式打开的文件则指向末尾。 §1 文件的打开、关闭与读写 如，使用Input#语句读取前例文件中的数据： Dim a, b, c, d Open c:\aa.txt For Input As 1 For i = 1 To 4 Input #1, a, b, c, d Print a; b; c; d Next Close 程序运行时出现错误。 §1 文件的打开、关闭与读写 二、随机访问文件 随机文件有特殊的格式要求： 文件中数据分为一个个等长的单元—记录； 每个单元中包含一项或多项数据—字段，各记录单元中字段数相等； 除字符串外，其它类型不转换为字符形式，而是以二进制形式直接存放。 随机文件一般不能通过记事本打开查看内容。 §1 文件的打开、关闭与读写 1.打开随机文件 Open 文件名,[For Random] As [#]文件号 Len=记