Merhabalar,
üstadlarım şimdi ben kendi sitemdeki bir txt dosyasında alt alta satırlar şeklinde bulunan site listesini projedeki listbox1'e eklemek istiyorum aşağıdaki gibi bir kod yazdım siteye ulaşıyor ve txt'i görüyor ancak sadece txt'deki son satırı görüyor. Bunu nasıl düzeltebiliriz?

Try
            Dim istek As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(sitelistesiurl)
            Dim Cevap As System.Net.HttpWebResponse = istek.GetResponse()
            Dim okuyucu As System.IO.StreamReader = New System.IO.StreamReader(Cevap.GetResponseStream())
            Dim siteler As String
            Do While okuyucu.Peek >= 0
                siteler = okuyucu.ReadLine()
            Loop
            ListBox1.Items.Add(siteler)
        Catch ex As Exception
            MsgBox("İşlem başarısız...")
        End Try