Imports System
Imports System.Text
Public Class LoopOverStringBuilder_VB_NET
Public Shared Sub Main()
Dim sb As StringBuilder = New StringBuilder("vb.net programming")
For i As Integer = 0 To sb.Length - 1
Console.Write(sb(i) & " ")
Next
End Sub
End Class
' run:
'
' v b . n e t p r o g r a m m i n g
'