SubFolders

SubFolders由指定資料夾中所有子資料夾（包括隱藏資料夾和系統資料夾）組成的 Folders集合。

描述

返回由指定資料夾中所有子資料夾（包括隱藏資料夾和系統資料夾）組成的 Folders集合。

語法

object.SubFolders
object應為 Folder對象的名稱。

說明

以下代碼舉例說明如何使用 SubFolders屬性：
Sub ShowFolderList(folderspec)
Dim fs, f, f1, s, sf
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
Set sf = f.SubFolders
For Each f1 in sf
s = s & f1.name
s = s &vbCrLf
Next
MsgBox s
End Sub