Dim sb As StringBuilder
sb.Initialize
sb.Append("The cat on the hot tin roof")
Log(sb)
'The cat on the hot tin roof
sb.Initialize 'clear sb
sb.Append("The quick fox")
Log(sb)
'The quick fox
sb.Remove(sb.Length - 5, sb.Length) 'shorten length by 5
Log(sb)
'The quic
sb.Append("k fox jumped over the ...") 'lengthen by appending text
Log(sb)
'The quick fox jumped over the ...
'alternative clearing technique
sb.Remove(0, sb.Length)
Log(sb)
sb.Append("1 2 3 5 6 7")
'insert a substring
sb.Insert(3, " 4")
Log(sb)
'1 2 4 3 5 6 7
'remove a substring
sb.Remove(3, 3 + 2)
Log(sb)
'1 2 3 5 6 7
'reverse char order
Dim sbstr As String = sb.toString
sb.Initialize
For i = sbstr.Length - 1 To 0 Step -1
sb.Append(sbstr.CharAt(i))
Next
Log(sb)
'7 6 5 3 2 1