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