Dim su As StringUtils
Dim finalList As List
finalList.Initialize
For Each Row() As Object In tablePlaylist.Items
Dim temp(Row.Length) As String
For i=0 To Row.Length-1
temp(i) = Row(i)
Next
finalList.Add(temp)
Next
su.SaveCSV(File.DirApp,"playlist.csv",",",finalList)
Dim su As StringUtils
Dim finalList As List
finalList = su.LoadCSV(File.DirApp,"playlist.csv",",")
For Each row() As Object In finalList
tablePlaylist.Items.Add(row)
Next