Dim content As String
content="This is a single line text that will be splited to show up as multiline text ,the code suports some improvements but it works"
Dim str() As String
str=Regex.Split(" ",content)
For k=6 To str.Length-1 Step 6
str(k)=str(k)&Chr(10)
Next
Dim sb As StringBuilder
sb.Initialize
For n=0 To str.Length-1
sb.Append(str(n)).Append(Chr(13))
Next
Info.content=sb.ToString