如题，谁给个思路

Dim mypath As String, myname As String

mypath = "c:\"   ' 指定路径。
myname = Dir(mypath, 7)    ' 找寻第一项。
Do While myname <> ""   ' 开始循环。
    Debug.Print myname            '显示文件名
    myname = Dir   ' 查找下一个文件
Loop

代码可行，dir（mypath,7） 这句7是什么意思

debug想起来是立即窗口显示。。

[ 本帖最后由 woa 于 2010-9-16 17:47 编辑 ]

vbReadOnly or vbHidden or vbSystem 'or vbNormal ' = 7

很有用

已解，非常感谢！