Imports System

Public Module Module1

    Public Sub Main()

        Const MAX_VALUE as Integer = 5

        For counter = 1 To MAX_VALUE

            Console.WriteLine("Hello World")

        Next

    End Sub

End Module