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