如何搜索任意一个目录下的所有文件夹,并显示出来
解决方案 »
- 怎么取得Text输入框中的整数?
- listview如何修改subitem!!!
- 用vb公共对话框的另存为对话框保存文件时,如何解决文件重名问题。急!!!再线等,如果好用当时给分!!!
- 请问怎么获取image框中的图片的路径呢?
- 各位高手,大侠,前辈,在VB中如何实现打印功能?谢谢了。
- VB中IMAGE控件LOAD图片提示“481错误,无效图片”
- 急救vb6.0-db2(5.1版)
- 请教一下各位高手!后缀为wdl的是什么文件?
- 有办法可以让字符串在程序里执行吗?
- 通过菜单编辑器删除了一个无用的菜单项和下面的子菜单,424报错
- ?*****如何将显示在datagrid中的查询结果生成一个dbf库文件*****
- 需要pos源代码------既给钱,又给分
Dim folderpath As String
Dim foldername As String
folderpath = "c:\"
foldername = Dir(folderpath, vbDirectory)
Do While foldername <> ""
foldername = Dir
If foldername = "" Then Exit Do
List1.AddItem foldername
Loop
End Sub一个CommandButton,一个ListBox