FileAttr 函数

返回一个 Long 类型的值，该值代表使用 Open 语句打开的文件的文件模式。

语法

FileAttr (filenumber， returntype)

FileAttr 函数语法包含以下命名参数：

Part	说明
filenumber	必需；Integer。 任何有效文件号。
returntype	必需；Integer。 指示要返回的信息类型的数值。 指定 1 将返回指示文件模式的值。 只在 16 位系统上，指定 2 来检索操作系统文件句柄。 Returntype 2 在 32 位系统上不受支持并会导致错误。

返回值

当 returntype参数 为 1 时，以下返回值指示文件访问模式：

模式	值
输入	1
"输出"	2
随机	4
Append	8
Binary	32

示例

此示例使用 FileAttr 函数返回打开文件的文件模式和文件句柄。 仅在 16 位系统上返回文件句柄；在 32 位系统上，将 2 作为第二个参数传递会生成一个错误。

Dim FileNum, Mode, Handle
FileNum = 1    ' Assign file number.
Open "TESTFILE" For Append As FileNum    ' Open file.
Mode = FileAttr(FileNum, 1)    ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2)    ' Returns file handle.
Close FileNum    ' Close file.

另请参阅

• 函数 (Visual Basic for Applications)

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。