欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Microsoft® Visual Basic® Scripting Edition
IsRootFolder 屬性
 語(yǔ)言參考  
版本 3  

請(qǐng)參閱                   應(yīng)用于


描述
如果指定的文件夾是根文件夾,返回 True;否則返回 False
語(yǔ)法
object.IsRootFolder

object 應(yīng)為 Folder 對(duì)象的名稱。

說(shuō)明
以下代碼舉例說(shuō)明如何使用 IsRootFolder 屬性:
Dim fs
Set fs = CreateObject("Scripting.FileSystemObject")
Sub DisplayLevelDepth(pathspec)
    Dim f, n
    Set f = fs.GetFolder(pathspec)
    If f.IsRootFolder Then
        MsgBox "指定的文件夾是根文件夾。"
    Else
        Do Until f.IsRootFolder
            Set f = f.ParentFolder
            n = n + 1
        Loop
        MsgBox "指定的文件夾是嵌套級(jí)為 " & n & " 的文件夾。"
    End If
End Sub