[سؤال] كيف نحذف السطر الجديد من متغير ممتليء بالنصوص

كود :

Do Until b.CancellationPending = True Or vbulletin_forum_last_thread_number < vbulletin_forum_oldest_thread_number

            Dim url As String = vbulletin_forum_furl & vbulletin_forum_threadurl & vbulletin_forum_last_thread_number

            turl.Text = url

            Dim page As String = vbulletin_loadpage(url)

            '(<img src=")(.*\.gif|png|jpg|jpeg)(.*/>)

            Dim regstr As String = "(<img src="")(.*\.gif|png|jpg|jpeg)(.*/>)"

            Dim reg As New Regex(regstr)

            Dim mcoll As MatchCollection = reg.Matches(page)

            progpage.Maximum = mcoll.Count

            Dim all As String = ""

            Dim wc As New Net.WebClient

            wc.Encoding = Encoding.Default

            wc.Headers.Add("cookie", fillvbulletincookie)

            Dim m As String = ""

            For i = mcoll.Count - 1 To 0 Step -1

                m &= mcoll(i).Groups(2).Value & vbNewLine

            Next

            Dim h As String = ""

            For Each t In m.Split("""")

                ' TextBox1.AppendText(t & vbNewLine)

                h &= t & vbNewLine

            Next

            For Each z In h.Split("")

                all &= (z & vbNewLine)

            Next

            Dim fall As String = ""

            For Each p In all.Split(vbNewLine)

                If p.Trim.Replace(" ", "").StartsWith("images") Then

                    fall &= (p & vbNewLine)

                End If

            Next

            For Each t In fall.Split(vbNewLine)

                If t.ToString.Trim.Replace(" ", "") = "" Then

                Else

                    t = t.Replace(vbNewLine, "")

                    t = t.Replace(" ", "")

                    Dim nt As String = ""

                    nt = t.Replace(vbNewLine, vbNullString)

                    nt = t.Replace(" ", vbNullString)

                    MsgBox(nt)

                    Dim pn As String = IO.Path.GetFileName(nt)

                    'wc.DownloadFile(vbulletin_forum_furl & t, "images\" & pn)

                End If

            Next

        Loop