FileSystem.GetAttr(String) 方法
定义
重要
一些信息与预发行产品相关，相应产品在发行之前可能会进行重大修改。 对于此处提供的信息，Microsoft 不作任何明示或暗示的担保。
返回一个表示文件、目录或文件夹的特性的 FileAttribute 值。 相比 FileAttribute，My 功能可使文件 I/O 操作的效率更高、性能更好。 有关详细信息，请参阅 FileSystem。
public:
static Microsoft::VisualBasic::FileAttribute GetAttr(System::String ^ PathName);public static Microsoft.VisualBasic.FileAttribute GetAttr (string PathName);static member GetAttr : string -> Microsoft.VisualBasic.FileAttributePublic Function GetAttr (PathName As String) As FileAttribute参数
- PathName
- String
必需。 指定一个文件名、目录名或文件夹名的字符串表达式。 PathName 可以包含驱动器和目录或文件夹。
返回
枚举值的按位组合。
例外
Pathname 无效或包含通配符。
目标文件不存在。
示例
此示例使用 GetAttr 函数来确定文件和目录或文件夹的属性。
Dim MyAttr As FileAttribute
' Assume file TESTFILE is normal and readonly.
MyAttr = GetAttr("C:\TESTFILE.txt") ' Returns vbNormal.
' Test for normal.
If (MyAttr And FileAttribute.Normal) = FileAttribute.Normal Then
MsgBox("This file is normal.")
End If
' Test for normal and readonly.
Dim normalReadonly As FileAttribute
normalReadonly = FileAttribute.Normal Or FileAttribute.ReadOnly
If (MyAttr And normalReadonly) = normalReadonly Then
MsgBox("This file is normal and readonly.")
End If
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("C:\MYDIR")
If (MyAttr And FileAttribute.Directory) = FileAttribute.Directory Then
MsgBox("MYDIR is a directory")
End If
注解
若要确定设置的属性，请使用 And 运算符对函数返回 GetAttr 的值和所需的单个文件属性的值执行按位比较。 如果结果不为零，则为命名文件设置该属性。 例如，如果未设置 属性，Archive则以下And表达式的返回值为零：
Result = GetAttr(FName) And vbArchive
如果设置了 属性， Archive 则返回非零值。
