Ler todos os arquivos .txt e carregar no gridview

[Ler todos os arquivos .txt e carregar no gridview]

Bom dia,

 

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, podem me ajudar?

 

Obs.: Quando utilizo o nome fixo do arquivo, funciona.

 

Código abaixo:

 

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:

 

Primeiro arquivo

 

Segundo arquivo: