欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Microsoft® Visual Basic® Scripting Edition
Files 屬性
 語(yǔ)言參考  
版本 3  

請(qǐng)參閱                   應(yīng)用于


描述
返回由指定文件夾中所有 File 對(duì)象(包括隱藏文件和系統(tǒng)文件)組成的 Files 集合。
語(yǔ)法
object.Files

object 應(yīng)為 Folder 對(duì)象的名稱(chēng)。

說(shuō)明
以下代碼舉例說(shuō)明如何使用 Files 屬性:
Sub ShowFileList(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