CSVからDataTableにセットしようとしているのですが、以下のコードで列がテーブルに属していないとエラーが出ます。
列名を変数で管理しているのがいけないのでしょうか？
よろしくお願いいたします。

        Dim dt As New DataTable
        Dim dtrow As DataRow
        Do Until ReadFile.AtEndOfStream
            sReadCsv = ReadFile.ReadLine
            Select Case colum_setflg
                Case False
                    record_colum = sReadCsv.Split(","c)
                    For cnt As Integer = 0 To record_colum.Count - 1
                        'ダブルクォーテーションを削除
                        dt.Columns.Add(record_colum(cnt).Trim(""""c, """"c))
                    Next
                    colum_setflg = True
                Case True
                    dtrow = dt.NewRow
                    record_row = sReadCsv.Split(","c)
                    For cnt As Integer = 0 To record_colum.Count - 1
                        'ダブルクォーテーションを削除
                        dtrow(record_colum(cnt)) = record_row(cnt).Trim(""""c, """"c)
                    Next
                    dt.Rows.Add(dtrow)
            End Select
        Loop