文件名按系统的"列表显示
今天碰到这样一个问题:
查看"D:\123\"下的*.txt文件,并且像操作系统的查看方式里的列表样式显示出来,现在不知使用什么控件完成,是listbox吗?
实现的显示效果如下:
01.txt 02.txt 03.txt
04.txt 05.txt 06.txt
07.txt 08.txt 09.txt
10.txt 11.txt 12.txt
13.txt

请各位码友帮忙,谢谢!

[解决办法]

'示例:
'增加一个 Dir控件,一个Drive控件,一个File控件,一个ListView控件.
Private Sub Dir1_Change()
  File1.Path = Dir1.Path
  
  ListView1.ListItems.Clear
  For i = 1 To File1.ListCount
    ListView1.ListItems.Add , , File1.List(i)
   ' Stop
  Next
End Sub

Private Sub Drive1_Change()
 Dir1.Path = Drive1.Drive
End Sub


Private Sub Form_Load()
 ListView1.View = lvwList
End Sub