Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("What is the number of life?")

        Dim Input As Integer

        Input = Console.ReadLine()

        If Input = 42 then

            Console.WriteLine("Exactly Correct!)

        else If Input < 42

            Console.WriteLine("too low")

        else If Input > 42

            Console.WriteLine("too high")

    End Sub

End Module