อ่าน text file ขนาดใหญ่มาก 73000 กว่าบรรทัด (ข้อคำแนะนำด้วยครับ)

Try
            Dim list As New ArrayList
            Dim line As String

            Dim readFile As System.IO.TextReader = New StreamReader("U:\user\AKR\copy.txt")
            While True
                line = readFile.ReadLine()  'อ่านไฟล์ทีละบรรทัด เริ่มต้นบรรทัดที่ 0 
                If line Is Nothing Then
                    Exit While
                Else
                    list.Add(line)

                End If
                For Each element In list
                    line = line + element

                Next element
                RichTextBox1.Text = line
            End While

            readFile.Close()
            readFile = Nothing
        Catch ex As IOException
            MsgBox(ex.ToString)
        End Try