vb 打开文件夹里的所有txt文件
例如 d:\download 里面有53612.txt 53810.txt 53723.txt 43216.txt
我想按数序依次读取里面的内容
谢谢!
[解决办法]
窗体上放一个 ListBox,Visible 可设置为 False,Sorted 属性设置为 True。
Dim strFile As String, i As Iteger
strFile = Dir("d:/download/*.txt")
Do Until strFile = ""
List1.AddItem strFile
strFile = Dir()
Loop
For i = 0 To List1.ListCount - 1
Open "d:/download/" & List1.List(i) For Input As #1
'......
Close #1
Next i
[解决办法]
shell "dir /b /a-d /on d:\download\*.txt >d:\f.txt"
'然后读文件d:\f.txt的内容,每行一个文件名按名字排序