codice:
Dim fs As String() = Directory.GetFiles("c:\documenti", "*.*", IO.SearchOption.AllDirectories)
Dim k(fs.Length - 1) As Integer
For i As Integer = 0 To fs.Length - 1
	k(i) = fs(i).Length
	fs(i) = String.Format("{1:000} {0}", fs(i), fs(i).Length)
Next

Array.Sort(Of Integer, String)(k, fs)
Array.Reverse(fs)

Me.DataGridView1.DataSource = fs
L'obiettivo è leggere tutti i files di una directory e sottodirectory, ordinarli per lunghezza file decrescente, e mostrarli in una griglia

:master: Mi sono inceppato perchè mi fa vedere una lista di numeri invece di una lista di files

Un aiuto?