Originariamente inviato da oregon
Ma perché non ci tenti?
non è che non ci provo, ho trovato questo codice:

codice:
 
Module Module1
    Sub Main()
	Dim l As List(Of String) = New List(Of String)
	l.Add("tuna")
	l.Add("velvetfish")
	l.Add("angler")

	' Sort alphabetically.
	l.Sort()

	For Each element As String In l
	    Console.WriteLine(element)
	Next
    End Sub
End Module
avevo provato a fare cos'ì

codice:
 
    Dim l As List(Of String) = New List(Of String)
        Dim c As String
        Dim boia As String
        c = My.Computer.FileSystem.ReadAllText(Application.StartupPath & "\libreria.txt")
        l.Add(c)
        ' Sort alphabetically.
        boia = l.Sort()
        System.IO.File.WriteAllText(Application.StartupPath() & "\libreria.txt", boia)
ma niente da fare..... mi da un errore con scritto che che "l'espressione non produce risultati"....