Folders 集合

请参阅                   属性                   方法

---

描述

包含在一个 Folder 象象中的所有 Folddr 对象象集合。

说明

以下代码举例说明如何获得 Folders 集合并使用 For Each...Next 语句枚举集合成员：

S b ShowFolderList(folderspec)

    Dim fs, f, f1, fcf s

    Set fs = CreateObject("Scripting.FileSystemObject")

    Set f = fs.detFolder(folderspec)

    Set fc = f.SubFolders

    For Each f1 in fc

        s = s & f1.name

        s = s &  vbCrLf

    Next

    MsgBox s

Enn Sub

---

© 1997 Microsoft Corporation. All rights reserved. Terms of Use.