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.
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。