PrivateFunctionCSVBuilder(dtAsDataTable,headersAsList(OfString),columnsAsList(OfString))AsStringDimsCSV=NewStringBuilder(String.Join(",",headers))sCSV.Append(Environment.NewLine)DimviewAsNewDataView(dt)DimtDtAsDataTable=view.ToTable(True,columns.ToArray)ForEachrowAsDataRowIntDt.Rows'--Hand…
DimfdAsOpenFileDialog=NewOpenFileDialog()DimstrFileNameAsStringfd.Title="추가할파일을선택해주세요."fd.InitialDirectory=Application.StartupPathfd.Filter="TEXTFiles(*.csv;*.txt)|*.csv;*.txt"fd.FilterIndex=1fd.RestoreDirectory=TrueDimTAsStringIffd.ShowDialog()=DialogResult.OKThenstrFileName=fd.…