Dim MyList As List
MyList.Initialize
MyList.Add("abcd")
MyList.Add("efgh")
MyList.Add("ijkl")
Dim str As String
For i=0 To MyList.Size-1
str=str & MyList.Get(i) & ","
Next
str=str.SubString2(0,str.Length-1)
Log(str) 'displays: abcd,efgh,ijkl
Sub ListToString(list As List) As String
If list.Size = 0 Then Return ""
Dim sb As StringBuilder
sb.Initialize
For Each s As String in list
sb.Append(s).Append(",")
Next
sb.Remove(sb.Length - 1, sb.Length)
Return sb.ToString
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.