2015-06-14 74 views
0

我在List(Of String)()的目录中添加了文件列表。我需要帮助将这些文件按特定顺序排列。例如,如果我有列表中的文件1,2,3,4,我怎么能把文件放在说4,2,1,3顺序?按特定顺序将文件添加到列表(字符串)

Dim aryFi As FileInfo() = di.GetFiles("*.pdf") 
Dim fi As FileInfo 

Dim fileInput As New List(Of String)() 

For Each fi In aryFi 
    fileInput.Add(fi.Name) 
Next 
+0

而如何定义这个特定的顺序? –

+0

按文件名。每个文件名都以“Po-xyz.pdf”,“Invoice-yyx.pdf”,“Sup-wrt.pdf”等标识符开头。因此,我希望按照以下顺序对文件进行编码。 pdf,Invoice-yyx.pdf和Po-xyz.pdf。 – caldba

+0

最简单的方法可能是将文件分类到每个'Po','Sup'和'Invoice'的不同列表中。 –

回答

1
Dim fileInput As New List(Of String) 

For Each fi as FileInfo in di.GetFiles("Sup-wrt.pdf") 
    fileInput.Add(fi.Name) 
Next 
For Each fi as FileInfo in di.GetFiles("Invoice-*.pdf") 
    fileInput.Add(fi.Name) 
Next 
For Each fi as FileInfo in di.GetFiles("Po-*.pdf") 
    fileInput.Add(fi.Name) 
Next 
+0

谢谢。一个问题,我如何GetFiles小写? – caldba

+0

你的意思是你想要列表中的所有字符串都是小写吗?如果是这样,请使用'fileInput.Add(fi.Name.ToLower)'。 – clweeks

相关问题