注意: 如果 Microsoft Jet 表达式服务在沙盒模式下运行,则禁用本主题中所述的函数、方法、对象或属性,这会阻止计算潜在的不安全表达式。 有关沙盒模式的详细信息,请在“帮助”中搜索“沙盒模式”。
返回一个 Long 类型的值,表示使用 Open 语句打开的文件的文件模式。
语法
FileAttr ( filenumber,returntype )
FileAttr 函数语法具有以下参数:
参数 |
说明 |
filenumber |
必需。 整数。 任何有效的 文件编号 。 |
returntype |
必需。 整数。 指示要返回的信息类型的数字。 指定 1 可返回指示文件模式的值。 仅在 16 位系统上指定 2 以检索操作系统文件句柄。 32 位系统中不支持 returntype 2,并导致错误。 |
返回值
当 返回类型参数 为 1 时,以下返回值指示文件访问模式:
Mode |
值 |
输入 |
1 |
输出 |
2 |
随机 |
4 |
追加 |
8 |
二进制 |
32 |
示例
注意: 下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息,请在搜索旁边的下拉列表中选择“开发人员参考”,并在搜索框中输入一个或多个术语。
此示例使用 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.