第6章文件操作

第6章文件操作内容摘要：

号；参数 varname为必选参数，用来保存从文件中读出的数据。 例如，在本案例中，便是使用Line Input 语句一行一行地读取文件（文件号为 1）中的数据，并显示在文本框中，直到文件的最后一行。 【 知识扩展 】 （ 2）除了可以使用 Line Input 语句来读取顺序文件中的数据之外，还可以使用 Input函数或 Input语句来读取顺序文件中的数据。 使用 Input函数来读取文件数据的语法结构为 字符串变量名＝ Input(number,[]filenumber) 其中参数 number为必选参数，用于指定要读取的长度；参数 filenumber为必选参数，对应于用 Open语句打开文件时所指定的文件号。 使用Input语句来读取文件数据的语法结构为 Input ＃ filenumber,varlist 其中参数 filenumber为必选参数，对应于用 Open语句打开文件时所指定的文件号；参数 varlist为必选参数，用来保存从文件中读出的数据，变量之间以逗号相间。 【 知识扩展 】 （ 1）无论何种类型的文件，在对文件进行读写操作之前，首先必须使用 Open语句将文件打开，最简单的语法结构如下： Open filename For mode As []filenumber 各参数的说明如表 62所示。 如果要读取文件数据，则必须以 Input方式打开文件，例如；在案例中，在读出文件中数据之前，都以 Input方式打开文件如果要写入数据到文件中，则必须以 Output或 Append方式打开文件，例如，在案例中，在保存数据之前，便是以 Output方式打开文件。 在对文件进行读写操作之后，必须使用 Close语句关闭已打开的文件，具体语法结构如下： Close [filenumberlist] 其中参数 filenumberlist为可选参数，其值为一个或多个有效的文件号。 当 filenumberlist为多个文件号，必须以逗号相间，即 文件号 ,文件号 ,……。 如果省略参数 filenumberlist，则关闭用 Open语句打开的所有文件。 参 数 说 明 filename 必选参数 ， 为字符串表达式 ， 用于指定文件名 ， 文件名还可以包括文件的详细路径 mode 必选参数 ， 用于指定文件打开方式 ， 可取 Append（ 附加方式 ） 、 Binary（ 二进制方式 ） 、 Input（ 读入方式 ） 、Output（ 输出方式 ） 、 Random （ 随机方式 ） 等值 ， 如果未指定存取方式 ， 则以 Random（ 随机 ） 方式打开文件 filenumber 必选参数 ， 其值为一个有效的文件号 ， 取值范围为 1～511。 使用 FreeFile 函数可得到下一个可用的文件号 表 62 Open语句的参数说明 【 知识扩展 】 （ 2）向顺序文件中写入数据，可以使用 Print语句来完成，具体语法结构如下： Print filenumber, printlist 其中参数 filenumber为必选参数，对应于用 Open语句打开文件时所指定的文件号；参数 printlist为可选参数，为将要被写入文件的数据列表。 例如，在本案例中，我们通过代码 Print 1, ，将文本框中的文字写入到文件号为 1的文件中。 （ 3）除了可以用 Print语句向顺序文件中写入数据之外，还可以用Write＃语句向顺序文件中写入数据，具体语法结构如下： Write filenumber, printlist 各参数的说明和 Print＃语句一样。 另外用 Print＃语句写入的数据一般用 Line Input＃或 Input语句读出，而用 Write＃语句写入的数据通常用Input＃语句读出。 （ 4）在 Visual Basic ，除了在本案例中已用到的文件操作语句外（如 Open， Close等语句），还有以下常用文件操作语句或函数。  EOF函数 EOF函数返回一个布尔型或逻辑型的数据，用于测试是否已经到达文件结束部分。 语法结构如下： EOF(filenumber) 其中参数 filenumber为必选参数，对应于用 Open语句打开文件时所设的文件号。 只有到达文件的结尾部分， EOF才返回 True，否则返回False。 在对文件进行操作时，可使用 EOF函数来判断是否到达文件尾部，以避免因试图在文件结尾处写入数据而产生错误。  FreeFile函数 FreeFile函数返回下一个可供 Open语句所使用的文件号，其语法结构如下： FreeFile[(rangenumber)] 其中参数 rangenumber为可选参数，用于指定文件号的取值范围，以便 FreeFile函数返回在该范围内的下一个可用的文件号。 如果 rangenumber取为 0，表示 FreeFile函数返回一个介于 1～ 255的有效文件号；如果 rangenumber取为 1，表示 FreeFile函数返回一个介于 256～ 511的有效文件号。  FileLen函数 FileLen函数返回一个表示文件大小的长整型数据，语法结构如下： FileLen(pathname) 其中参数 pathname为必选参数，为一字符串表达式，用于指定文件的详细路径。 使用 FileLen函数来获取文件大小时，可以不必先打开相应的文件。 如果所指定的文件已经被打开，则 FileLen函数返回的是文件打开前的大小。  LOF函数 LOF函数返回一个表示文件大小的长整型数据，语法结构如下： LOF(filenumber) 其中参数 f。