複製鏈接
請複製以下鏈接發送給好友

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