Imports System

Public Module Module1

    Public Sub Main()

        For counter As Long = 1 To 1000000

            Console.WriteLine("Comment #{0} of 1,000,000 until you enlist.", counter)

        Next

    End Sub

End Module