想建立个列表框,显示时时生成的文件名,请问该如何做?
小弟做了时时资料处理,现在想搞个可视框程序显示在几个文件架下的文件生成情况(只要显示文件名就可以了)
本人刚学VB很多都不懂,请教各位了.谢谢
[解决办法]
你是想要实时查看指定文件夹下的所有文件呢还是只看指定文件夹下最新生成的文件,请说清楚点才能帮你
[解决办法]
只直使用filelistbox控件加上Timer控件配合就可以实时查看指定文件下的所有文件;如果只要查看新生成的文件就用两个filelistbox和一个Textbox或Listbox在Timer事件中先刷新任一个filelistbox然后对比两个filelistbox的filelistcount是符相等,不等再逐一对比,将不同的文件名加入Textbox或Listbox中即可;下面是源代码:
Private Sub Timer1_Timer()
File1.Refresh
If File1.ListCount = File2.ListCount Then Exit Sub
If File1.ListCount > File2.ListCount Then
n = 0
For i = 0 To File1.ListCount - 1
If File1.List(i + n) <> File2.List(i) Then
n = n + 1
List1.AddItem File1.List(i), n - 1
End If
Next
End If
File2.Refresh
End Sub
[解决办法]
如果需要对多个文件夹同时进行监控,发邮件给我,我帮你做一个全面的监控程序。邮箱地址:jacktown@163.com