LOF(#文件号):返回用Open语句打开的文件的字节数,若是 空文件则函数值为0。对于尚未打开的文件,可使用 Filelen(文件 名)函数计算其长度。 例如: Dim Filelength as long Open"' Filel.dat" For Input as#1·打开文件进行读操作。 Filelength= LOF(1) 调用LOF函数计算文件长度 Close #1 1023文件的关闭 对文件进行完各种操作之后,必须关闭。 Close[文件号列表 文件号列表:代表一个或多个文件号。若省略,表示关闭Open语 句打开的所有文件。 例如: Close 关闭文件号为1的文件 Close1,2'关闭当前已打开的文件号为1和文件号为2的文件 Close 关闭所有打开的文件 注意:文件关闭后,与其原文件号不再关联,该文件号可分配给 其它文件使用LOF（#文件号）：返回用Open语句打开的文件的字节数，若是 空文件则函数值为0。对于尚未打开的文件，可使用FileLen(文件 名)函数计算其长度。 例如： Dim FileLength As Long Open "File1.dat" For Input As #1 '打开文件进行读操作。 FileLength = LOF(1) '调用LOF函数计算文件长度。 Close #1 10.2.3 文件的关闭 对文件进行完各种操作之后，必须关闭。 Close [文件号列表] 文件号列表：代表一个或多个文件号。若省略，表示关闭Open语 句打开的所有文件。 例如： Close 1 '关闭文件号为1的文件 Close 1, 2 '关闭当前已打开的文件号为1和文件号为2的文件 Close '关闭所有打开的文件 注意：文件关闭后，与其原文件号不再关联，该文件号可分配给 其它文件使用