📅  最后修改于: 2022-03-11 14:51:55.999000             🧑  作者: Mango
代码示例1
Dim StrFile As String
StrFile = Dir("c:\testfolder\*test*")
Do While Len(StrFile) > 0
Debug.Print StrFile
StrFile = Dir
Loop