No moc tady nemachrujte, to vaše řešení je taky zbytečně komplikované a navíc na to mohl tazatel jen zapomenout - od toho je breakpoint a odkrokování.
Using reader As New StreamReader("seznamJmen.txt")
lstSeznamJmen.BeginUpdate()
While Not reader.EndOfStream
Dim line As String = reader.ReadLine()
lstSeznamJmen.Items.Add(line)
End While
lstSeznamJmen.EndUpdate()
End Using
Já osobně bych navíc preferoval tohle:
lstSeznamJmen.Items.AddRange(File.ReadAllLines("seznamJmen.txt"))
Nebylo by to vhodné pro příliš velké soubory (načítá se do paměti vše a nezpracovává se to pustupně), na druhou stranu takové soubory nemá ani smysl cpát do listboxu, protože by v něm nikdo nic nenašel.
|