SubFolders

描述

返回。

object 應

object 應為 Folder 對為 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

基本介紹

• 外文名：SubFolders
• 注釋：object 應為 Folder對象的名稱。
• 語法：object.SubFolders
• 描述：由指定資料夾組成 Folders集合

描述

返回。

object 應

object 應為 Folder 對為 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