Visual Basic - Esto no me sale....Ayuda!!

Hola a todos necesito meter en un listbox los ficheros que contenga un directorio que yo elija pero que lo haga ordenado por fecha de creacion/modificacion como cuando en el explorador de windows le das a la columna Modificado y te los ordena pero que los añada directamente asi. De momento he logrado que me carge los ficheros en el listbox pero lo que no me sale es ordenarlos como he dicho antes,
este es el codigo que uso para cargar los ficheros:

If Dir1.Path = "C:\" Then
NombreArchivo = Dir(Dir1.Path, vbNormal)
Do While NombreArchivo <> ""
List2.AddItem NombreArchivo
NombreArchivo = Dir
Loop
Dir1.Path = "C:\"
Else
NombreArchivo = Dir(Dir1.Path + "\*.*", vbNormal)
Do While NombreArchivo <> ""
List2.AddItem NombreArchivo
NombreArchivo = Dir
Loop
End If

he mirado por la ayuda y he visto alguna funcion como FileDateTime pero como no tengo mucha idea de visual no se como usarla en este caso, me vendria bien una ayudita.

Saludos.

busca algo de informacion del FSO, file system object, manejo de archivos, es muy interesante