VB.NET用字母數字排序目錄中的文件

Question

如何用字母數字排序下面這個目錄中的文件？ 一個文件的例子：12325_2011.jpg

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
    If Not Page.IsPostBack Then 
     Dim di As New IO.DirectoryInfo(ImagePath) 
     Dim imageArray As IO.FileInfo() = di.GetFiles() 
     Dim image As IO.FileInfo 

     'list the names of all images in the specified directory 

     For Each image In imageArray 
      CheckBoxList1.Items.Add(image.Name) 
     Next 
    End If 
End Sub 

Answer 1

只需修改現有的象這樣的每循環：

For Each image In imageArray.OrderBy(Function(i) i.Name) 
    CheckBoxList1.Items.Add(image.Name) 
Next 

Answer 2

你可以使用的，而不是你的圖像陣列排序列表類：

http://msdn.microsoft.com/en-us/library/system.collections.sortedlist.aspx

例如

For each Item in di.GetFiles 
    'Add image url to sorted list 
Next 


For Each Item in SortedList 
    'Add to checkbox list 
Next