Fill list box with file names, sorted by creation date

[TimTDP]

I use the following to fill a list box with the names of files in a folder

Private Sub GetFileList()

Dim LoadFiles As String
Dim strFill As String
Dim FileFolder As String

FileFolder =  "C:\Temp\20132014\Orders"

LoadFiles = Dir$(FileFolder & "\*.pdf")
Do While LoadFiles > ""
   strFill = strFill & LoadFiles & ";"
   LoadFiles = Dir$
Loop

Me.lstWebOrders.RowSource = strFill

End Sub

How can I sort the list box so the files are shown by the date created, in descending order?

Thanks in advance

 

[pr2-eugin]

Tim, I think there is a method called FileDateTime, but I have not used it before.. I will see if I can find any links/tutorials..

? FileDateTime("N:\DONOT CHANGE\NOUSE\HEG.accdb")
09/05/2013 17:28:56