Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Pete")

        Console.WriteLine("Pete")

        Console.WriteLine("Pete")

    End Sub

End Module

​

Public Module Module2

    Public Sub Main()

        Dim nStart as integer

        Dim nfinish as integer

        nStart = Console.ReadLine()

        nfinish = Console.ReadLine()

        Dim i as integer

        For i= nStart to nfinish

        Console.WriteLine(i)

    Next

    End Sub

End Module