更新：2007 年 11 月
返回一个枚举值，表示用 FileOpen 函数打开的文件的文件模式。
在文件 I/O 操作中，My.Computer.FileSystem 对象 具有比 FileAttr 函数更高的效率和更好的性能。有关更多信息，请参见 My.Computer.FileSystem.GetFileInfo 方法。
Public Function FileAttr(ByVal FileNumber As Integer) As OpenMode
参数
- FileNumber
必需。Integer。任何有效文件号。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
FileNumber 不存在。 |
||
文件模式无效。 |
如果正在升级使用非结构化错误处理方式的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象） 比较错误号。） 然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述 替换这种错误控制。
返回值
下列枚举值指示文件访问模式：
值 |
模式 |
|---|---|
1 |
OpenMode.Input |
2 |
OpenMode.Output |
4 |
OpenMode.Random |
8 |
OpenMode.Append |
32 |
OpenMode.Binary |
备注
该函数返回一个枚举值，表示用 FileOpen 函数打开的文件的文件模式。
示例
本示例使用 FileAttr 函数返回已打开文件的文件模式。
Dim mode As OpenMode
FileOpen(1, "c:\TESTFILE.TXT", OpenMode.Input)
mode = FileAttr(1)
MsgBox("The file mode is " & mode.ToString())
FileClose(1)
智能设备开发人员说明
不支持此函数。
要求
**模块：**FileSystem
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）