[VB学习中]之六：文件操作

文件的打开与读写

Open “文件名” For 模式 As [#] 文件号 [Len=记录长度]

模式：

（1）顺序访问模式

OutPut：打开一个文件，将对该文件进行写操作。

Input：打开一个文件，将对该文件进行读操作。

Append：打开一个文件，将在该文件末尾追加记录。

-----写数据：其中的[输出列表]一般指用逗号，分隔的数值或字符串表达式。Write #与Print #的功能基本相同，区别是Write #是以紧凑格式存放，在数据间插入逗号，并给字符串加上双引号。

Print #文件号，[输出列表]

文件Print_File.txt写入格式：

miracle
哦
香蕉

Write #文件号，[输出列表]

文件Write_File.txt写入格式：

"miracle","哦","香蕉"

-----读数据：

Input #文件号，变量列表

文件Print_File.txt 与 Write_File.txt读出格式：

miracle
哦
香蕉

Line Input #文件号，字符串变量

文件Print_File.txt读出格式：

miracle
哦
香蕉

文件Write_File.txt读出格式：

"miracle","哦","香蕉"

Input$（读取的字符数，#文件号）

格式同Line Input#

与读文件有关的两个函数：

LOF（）：返回某文件的字节数。

EOF（）：检查指针是否到达文件尾。

（2）随机访问模式

Random：文件以随机方式打开后，可以同时进行写入和读出操作，但需要指明记录的长度，系统默认长度为208个字节。

-----写数据：Get命令是从磁盘文件中将一条由记录号指定的记录内容读入记录变量中；记录号是大于1的整数，表示对第几条记录进行操作，如果忽略不写，则表示当前记录的下一条记录。

Get [#]文件号，[记录号]，变量名

文件Get_File.txt写入格式：

miracle      哦      香蕉

-----读数据：命令是将一个记录变量的内容，写入所打开的磁盘文件指定的记录位置；记录号是大于1的整数，表示写入的是第几条记录，如果忽略不写，则表示在当前记录后插入一条记录。

Put [#]文件号，[记录号]，变量名

文件Get_File.txt读出格式(按记录号显示，如3为)：

香蕉

（3）二进制访问模式

Binary：最原始的文件类型，直接把二进制码存放在文件中，没有什么格式，以字节数来定位数据，允许程序按所需的任何方式组织和访问数据，也允许对文件中各字节数据进行存取和访问。

文件号：

文件号是一个介于1-511之间的整数，打开一个文件时需要指定一个文件号，这个文件号就代表该文件，直到文件关闭后这个号才可以被其他文件所使用。可以利用FreeFile()函数获得下一个可以利用的文件号。

Dim lngFH As Long

lngFH=FreeFile

文件的关闭

Close [#]文件号[，[#]文件号]…

结束各种读写操作后，必须将文件关闭，否则会造成数据丢失。关闭文件的命令是Close。