Za předpokladu hodnot typu int:
Using sw As New StreamWriter("hodnoty.txt")
For Each hodnota As int In hodnoty
sw.WriteLine(hodnota)
Next
End Using
Dim hodnoty As New List(Of Integer)()
Using sr As New StreamReader("hodnoty.txt")
While InlineAssignHelper(radek, sr.ReadLine() IsNot Nothing)
hodnoty.Add(Integer.Parse(radek))
End While
End Using