如题:例如何查找到c:\picture\目录下所有 *.jpg文件个数?
解决方案 »
- 16字节转换BCD显示时间
- 100分求教 如何把查询结果导出成CSV文件
- 为什么???????
- 一个VB加SQL Server的简单统计,帮忙一下!
- 关于ACTIVE REPORT的问题
- 为什么我用VC做的控件在VB下收不到windows的消息
- 想用VB实现在windows下方的闪烁图标!
- 如何用VB开发类似DOS的程序,就是运行时能传入参数
- vb 要引用olelib.tlb文件,不会编绎odl文件,求高人指教
- 关于TextBox控件的问题 请大家过来看看(给分的)
- 请教LoadResPicture加载的位图色位深度问题。
- 请各位大侠来讨论一下这个项目的程序结构如何设计,VB控制4个串口的问题!谢谢
Dim MyFile1 As String
MyFile1 = Dir("C:\picture\*.jpg")
I = 0
Do Until MyFile1 = ""
'List1.AddItem MyFile1
I = I + 1
MyFile1 = Dir
Loop
MsgBox I
'MsgBox List1.ListCount
End Sub