本页面由网页陶吧 龙犊收集整理 时间是: 02/05/06 下午 05:59:08.
页面地址: vsproIsRootFolder.htm
标题: IsRootFolder 属性  •  文件大小: 2580  •  更新时间: Sun, 05 Feb 2006 03:21:34 GMT

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 If
End Function

请参阅

Attributes 属性 | DateCreated 属性 | DateLastAccessed 属性 | DateLastModified 属性 | Drive 属性 | Files 属性 | Name 属性 | ParentFolder 属性 | Path 属性 | ShortName 属性 | ShortPath 属性 | Size 属性 | SubFolders 属性 | Type 属性

应用于:Folder 对象