Imports System

Public Module Module1

    Public Sub Main()

         'if you feel like you are repeating yourse, you are

        ' Use loops

​

​

        'Write Hello world 10 times

​

        'While Loop

        Dim i As Integer = 1

​

​

        While i <= 20 

            Console.WriteLine(i & " - Hello World")

            i += 1

​

        End While

        Console.ReadLine()

    End Sub

End Module