Imports System
Public Class Test
Public Shared Sub Main()
Dim s as string = ""
dim i as integer
Dim x as integer
For i = 1 to 8
s &= "hi"
next
Console.writeline(s)
Console.write line(x)
End sub
End Class