VB如何控制某个文件夹里面的文件数量？

Public Sub Load_logoin_Image(oProInet As Inet, oProImage As Image)

Dim oFSO As New FileSystemObject

Dim oFile As File

Dim cFile As String

On Error Resume Next

cFile = App。

Path &"\DataBase\ f"

要用inet控件之类的东西下载，保存到硬盘临时目录，再用LoadPicture()加载

放上一个

FileListBox

控件，

然后设置

File1.Path="你要统计的文件夹路径"

'File1

是FileListBox默认的控件名

然后：File1.ListCount属性就是文件夹中文件的数目。

可以将它赋值给一个变量进行显示

或

打印

在窗体上

---