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"....