请问怎么用vb读取文件夹中的文件数

Question

请问怎么用vb读取文件夹中的文件数？？？

Answer 1

很有用的2个函数-遍历某个目录中的文件名、输出目录中的文件数
http://www.21code.com/codebase/go.php?data=1491

Answer 2

连接下下来的东西 不是我要的 
里面的东西是下面这些话：
对不起，由于编程无限是个人网站、资金紧迫无法购买高级服务器，所以目前不允许其他站点直接连接，否则很多盗链会使服务器DOWN掉的。 能不能给贴下代码  或着 说明一下 在网站中查的是什么我去看看
谢谢拉

Answer 3

放一个filelistbox 
设置这个控件的目录 就是path 属性
MsgBox File1.ListCount这个就是文件数量

Answer 4

Private Sub Form_Load()Dim l As Longl = ShowFolderFiles("D:\Downloads")
MsgBox l
End SubFunction ShowFolderFiles(folderspec) As Long
Dim fs As FileSystemObject, f As Folder
Dim lret As Long
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    lret = f.files.Count
    ShowFolderFiles = lret
    
End Function注意引用Microsoft Scripting Runtime