Imports System

Public Module Module1

    Dim no1, no2, no3 as Integer

    Dim high, invalid as string

    Public Sub Main()

        Console.Write("Enter No. 1: ")

        no1 = console.ReadLine

        Console.Write("Enter No. 2: ")

        no2= console.ReadLine

        Console.Write("Enter No. 3: ")

        no3= console.ReadLine

        if no1 >= no2 and no1 >= no3 then

            high = no1

        elseif no2 >= no1 and no2 >= no3 then

            high = no2

        elseif no3 >= no1 and no3 >= no2 then 

            high = no3

    End if

        Console.WriteLine("The Highest Num is: "& high)

    End Sub

End Module