Ler todos os arquivos .txt e carregar no gridview.

[rl28]

Boa noite, 

Estou querendo ler todos arquivos que meu sistema gerou na minha máquina no formato .txt e carregar os mesmos em uma gridview, assim deixando apenas uma tela de consulta dos dados salvos nos arquivos txt, porém, meu código não está conseguindo consultar os arquivos, abaixo código:

 

Public Class formListaTransacao

    Private Sub formListaTransacao_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim dt As New DataTable

        dt.Columns.Add("Código")
        dt.Columns.Add("Descrição")
        dt.Columns.Add("Ação")

        Dim Arquivo As New System.IO.StreamReader("C:\Users\rl\Desktop\" & Me.Text & ".txt", System.Text.Encoding.Default)

        While Arquivo.Peek() <> -1
            dt.Rows.Add(Arquivo.ReadLine())
        End While

        DataGridView2.DataSource = dt
    End Sub

 

Tela do gridview:

 

Informação que consta no txt e que deve carregar no gridview: