Dim a As String = "aaaaa" Dim b As String = "bb" Dim c As String = "" Using writer As New IO.StreamWriter("C:\temp\mycsv.csv") writer.WriteLine($"""{a}"" ,""{b}"" ,""{c}""") '↓これでもできます 'writer.WriteLine("""" & a & """ ,""" & b & """ ,""" & c & """") End Using