How To Insert Titles Row Into CSV File

I have a .csv file which has data but not the column headers. I can able to create new .csv file with oldcsv file's content. But I need to add column headers in first row and from second row the existing data should appear.

Here is the code I have written:
Dim ioFile As New System.IO.StreamReader("C:sample.csv")
Dim ioLine As String
Dim ioLines As String
ioLine = ioFile.ReadLine
ioLines = ioLine
[Code] .....

Now I need to add column headers in new.csv as "ID","Name","Number","Amount".