Files

Files 集合 描述在一個資料夾內的所有 File 對象的集合。

說明下面的代碼舉例說明了如何獲得一個 Files 集合，以及如何用 For Each...Next 語句來訪問這個集合中的每個File：

Sub ShowFolderList(folderspec)

Dim fs, f, f1, fc, s

Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFolder(folderspec)

Set fc = f.Files

For Each f1 in fc

s = s & f1.name

s = s & vbCrLf

Next

MsgBox s

End Sub