VB.NET Sort files in directory by alphanumeric

How do I sort the files in this directory below by alphanumeric? An example of a file: 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

Just modify your existing For Each loop like this:

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

You could use the sorted list class instead of your image array:

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

e.g.

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


For Each Item in SortedList
    'Add to checkbox list
Next