# IsRootFolder 属性
object.IsRootFolder
如果指定的文件夹是根文件夹,返回 True;否则返回 False。
参数 | 描述 |
---|---|
object | 必选项。为 Folder 对象的名称。 |
说明 以下代码举例说明如何使用 IsRootFolder 属性:
Function DisplayLevelDepth(pathspec)
Dim fso, f, n
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(pathspec)
If f.IsRootFolder Then
DisplayLevelDepth ="指定的文件夹是根文件夹。"
Else
Do Until f.IsRootFolder
Set f = f.ParentFolder
n = n + 1
Loop
DisplayLevelDepth ="指定的文件夹是嵌套级为 " & n & " 的文件夹。"
End If
End Function
1
2
3
4
5
6
7
8
9
10
11
12
13
14
2
3
4
5
6
7
8
9
10
11
12
13
14
应用于