VBfreefile()函数

FreeFile[(rangenumber)]

可选参数rangenumber是一个变量，指定一个范围以返回该范围内的下一个可用文件号。指定0(默认值)以返回1-255之间的文件编号。指定1以返回256–511之间的文件号。

解释

使用FreeFile提供一个未使用的文件号。

FreeFile函数示例
此示例使用FreeFile函数返回下一个可用的文件号。在循环中，总共打开了五个输出文件，每个文件中都写入了一些数据。

Dim my index，file number
for my index = 1 to 5 '循环五次。
FileNumber = FreeFile '来获取未使用的文件号。
打开“test”& my index以# file number '的形式输出以创建文件名。
写下# filenumber，“这是一个样本。”将文本输出到文件。
关闭#FileNumber '以关闭文件。
下一个MyIndex

Variant数据类型
一种特殊的数据类型，可以包含数字、字符串或日期数据，以及自定义类型和空的特殊数值。Variant数据类型的数字存储大小为16个字节，可以包含十进制范围内的数据，或22个字节(加上字符串长度)的字符存储大小，可以存储任何字符文本。VarType函数定义如何处理Variant中的数据。对于所有变量，如果它们没有被显式声明为其他数据类型，它们就成为变体数据类型。