Private Sub Command1-Click()Dim ff() As String′定义一个字符串数组用来保存找到的文件名称Dim fn As Long′保存找到的文件数目fn=TreeSearch(〃C:%%dos〃,〃*.exe〃,ff())Print〃找到文件数目为〃;fnFor I=1 To fnPrint ff(I)NextEnd Sub当中的TreeSearch是什么函数?
慕村9548890
相关分类