IsRootFolder 属性

如果指定的文件夹是根文件夹，返回 True；否则返回 False。

object.IsRootFolder

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 IfEnd Function

VBS教程：属性-IsRootFolder 属性

原文：http://www.jb51.net/article/4427.htm