Folders

Folders 集合 描述包含在一個 Folder 對象內的所有 Folder 對象的集合。說明下面的代碼舉例說明了如何獲得一個 Folders 集合，以及如何用 For Each...Next 語句來訪問該集合中的每個Folder：Sub ShowFolderList(folderspec) Dim fs, f, f1, fc, s Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(folderspec) Set fc = f.SubFolders For Each f1 in fc s = s & f1.name s = s & vbCrLf Next MsgBox sEnd Sub