Imports System

Public Module Module1

    Public Sub Main()

        dim x as integer

        x = Console.ReadLine()

        if x >10 then

            console.writeline("Larger than 10")

        elseif x <10 then

            console.writeline("Smaller than 10")

        elseif x =10 then

            console.writeline("input = 10")

        end if

    End Sub

End Module

​

Public Module Module2

    Public Sub Main()

        dim x as integer

        x = console.readline()

        if x = 1 then

            console.WriteLine("one")

        elseif x = 2 then

            console.writeline("two")

        elseif x = 3 then

            console.WriteLine("three")

        elseif x = 4 then 

            console.WriteLine("four")

        elseif x = 5 then

            console.WriteLine("five")

        else

            console.writeline("invalid number")

        end if

    End Sub

End Module