Folders 集合

Folders 集合

Return to chapter overview

Microsoft® Visu®l Basic® ScriptingoEdition

Folders 集合

语言参考

版本 3

请参阅                   属性                   方法


描述

包含在一个 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.