vbs遍历文件夹

你好:我想知道代码的GF fd:Wh FD和WH i是什么意思啊

谢谢了,初学者

On Error Resume Next
Set fso = CreateObject("Scripting.FileSystemObject")
set fd=fso.getfolder("F:\test222")

GF fd:Wh FD
Sub GF(fol)
Dim i
For Each i In fol.SubFolders
WH i
Next
set fol2=fol.subfolders
for each fs2 in fol2
GF fs2
next
End Sub

Sub Wh(fol)
Dim i
For Each i In fol.Files
If LCase(fso.GetExtensionName(i)) = "cxx" Then
b=fso.GetBaseName(i)
msgbox b
end if
Next
End Sub

GF和Wh是两个 Sub 的函数名。

VBS中调用 SUB 的格式是:

 函数名 参数1,参数2,参数3…

且直接调用时不需要用括号把各个参数括起来

GF fd ==>  GF(fd)
Wh FD ==>  Wh(FD)
WH i  ==>  Wh(i)

GF fd:Wh FD中的冒号是用来分隔语句的,即,将两行的内容合并成一行,等价于

GF fd
Wh FD

Wh FD'这句属于冗余语句,可以删掉(GF递归时已经调用到它了)

温馨提示:答案为网友推荐,仅供参考
相似回答