Открыть txt-файл в виде файла данных с разделителями разделов Microsoft Excel (.csv)

Question

У меня есть тестовая машина, которую я использую на работе, которая выводит данные в большом файле txt (данные уже разделены запятыми), и я пытаюсь сделайте приложение vb.net, чтобы открыть txt как csv. Затем, чтобы поместить данные в графики в шаблоне excel, который я сделал. У меня уже есть код, который ищет указанную папку для теста с помощью combobox, но я застрял на следующем шаге. Открытие txt в виде csv.

Код:

Public Class RF_Data_AutoFormat 
Private Sub cbo_FileList_Click(sender As Object, e As EventArgs) Handles cbo_FileList.Click 
    Dim dir = "C:\Users\aholiday\Desktop\Data Dump" 
    cbo_FileList.Items.Clear() 
    For Each file As String In System.IO.Directory.GetFiles(dir) 
     cbo_FileList.Items.Add(System.IO.Path.GetFileName(file)) 
    Next 
End Sub 

Private Sub btn_Do_Click(sender As Object, e As EventArgs) Handles btn_Do.Click 
    Dim FileTXT 
    cbo_FileList.Text = FileTXT 
    FileOpen()?????? 

End Sub 
End Class 

Answer 1

Хорошо, я думаю, что я получил его. Я использовал File.Move(txtpath, csvpath) после того, как я объявил и назначил то, что txtpath и csvpath есть. Спасибо за предложение Tim

Код:

Imports System 
Imports System.IO 
Imports System.Text 
Public Class Form1 
Private Sub cbo_FileList_Click(sender As Object, e As EventArgs) Handles cbo_FileList.Click 
    Dim folderpath = "C:\Users\aholiday\Desktop\Data Dump" 
    cbo_FileList.Items.Clear() 
    For Each file As String In System.IO.Directory.GetFiles(folderpath) 
     cbo_FileList.Items.Add(System.IO.Path.GetFileNameWithoutExtension(file)) 
    Next 
End Sub 

Private Sub btn_Do_Click(sender As Object, e As EventArgs) Handles btn_Do.Click 
    Dim txtpath As String 
    Dim csvpath As String = "C:\Temp" 
    Dim FileTXT As String 
    Dim folderpath As String 

    folderpath = "C:\Users\aholiday\Desktop\Data Dump" 
    FileTXT = cbo_FileList.Text 
    csvpath = "C:\Temp\" & FileTXT & ".csv" 
    txtpath = folderpath & "\" & FileTXT & ".txt" 

    File.Move(txtpath, csvpath) 

End Sub 
End Class