Imports System

​

Public Module Module1

​

    Public Sub Main()

        Const phrase As String = "Hello world!”

        'For i = 0 To Len(phrase)

        '   Console.WriteLine(Left(phrase, i))

        For i = 0 To phrase.length

            Console.WriteLine(phrase.Substring(0, i))

        Next

    End Sub

End Module

​