Imports System
Imports System.Text
Public Class MainClass
Shared Sub Main()
Dim i As Integer
Dim buffer As StringBuilder = _
New StringBuilder("Hello, how are you?")
For i = 0 To buffer.Length - 1
Console.WriteLine(buffer(i))
Next
End Sub ' Main
End Class