0

我正在尝试将一些文档分类到列表框中,如果我的文档是扫描图片到文件夹中的集合,它必须在 lisbox1 列出每个文件夹,如果我的文档是 .pdf 它也必须添加

directo = "D:\books\

ListBox1.DataSource = IO.Directory.GetDirectories(directo, "*.*", IO.SearchOption.TopDirectoryOnly)
ListBox1.DataSource = IO.Directory.GetFiles(directo, "*.pdf", IO.SearchOption.TopDirectoryOnly)

我得到结果:

D:\books\Book-A

D:\书籍\书籍-B

D:\books\Book-C

或者

D:\books\Book-E.pdf

D:\books\Book-F.pdf

D:\books\Book-G.pdf

但我不能把它混为一谈,每次列表框只显示一个或另一个来源。有什么建议列出吗?

4

1 回答 1

1

GetDirectories您可以将and的返回值转换GetFiles为 a List(Of String),然后将两者合并在一起。然后可以将此合并列表分配给 ListBox 的 DataSource 属性。请参阅下面的示例。

Dim directories As List(Of String) = Directory.GetDirectories(directo, "*.*", SearchOption.TopDirectoryOnly).ToList()
Dim files As List(Of String) = Directory.GetFiles(directo, "*.pdf", SearchOption.TopDirectoryOnly).ToList()

Dim dataSourceList As New List(Of String)
dataSourceList.AddRange(directories)
dataSourceList.AddRange(files)

ListBox1.DataSource = dataSourceList
于 2021-06-12T21:37:17.450 回答