VBOpen函数详解打开关闭读写文件

（一）打开和关闭文件

     1、顺序文件



     打开顺序文件，我们可以使用Open语句。它的格式如下：



Open pathname For [Input |Output |Append] As [#]filenumber [Len = buffersize] 



     说明：



     （1）参数pathname 表示要打开的文件名，文件名可以包含有驱动器和目录



     （2）Input Output 和Append用于设置顺序文件的打开方式。其中，Input表示从打开的文件中读取数据。以这种方式打开文件时，文件必须存在，否则会产生错误。Output表示向打开的文件中写入数据。以这种方式打开文件时，文件中原有的数据将被覆盖，新的数据将从文件开始写入。如果文件不存在，则创建一个新文件。Append表示向打开的文件中添加数据。以这种方式打开时，文件中原有的数据将被保留，新的数据将从文件为开始添加。如果文件不存在，则创建一个新文件。



     （3）As[#]filenumber 子句用于为打开的文件指定文件号.对文件进行读写操作时,要用文件号表示该文件.文件号是介于1~511之间的整数,既可以是数字,又可以是变量.也可以省略不用.



     (4)当在文件与程序之间拷贝数据时,Len=buffersize子句指定缓冲区的字符数.



     例如:



Open App.Path + "\test.dat" For Output As 1



Open App.Path + "\test.dat" For Output As 1 



     这两句代码在当前应用程序所在目录下创建了一个名为test.dat的文本文件,分配文件号为1.



Open App.Path + "\test.dat" For Input As [#]filenumber 



     这条语句是从文本文件中读取数据.



Open App.Path + "\test.dat" For Append As [#]filenumber 



     这条语句则是像文本文件中添加数据



     2、随机文件



     操作随机文件之前,首先必须定义用于保存数据项的记录类型.该记录是用户自定义数据类型,他们是随机文件中存储数据的基本结构.例如:



Type Student

   No As Integer

   Name As String * 20

   age As Integer

End Type



Dim Stud As Student ‘定义一个可以存放学生材料的变量 



     随机文件中,所有的数据都将保存到若干个结构为Student类型的记录中, 而从随机文件中读出的数据则可以存放到变量Stud中.



     之后我们就可以打开并读写文件了.下面是打开随机文件的语法格式: