Imports System

Public Module Module1

    Dim no1, no2 as Integer

    Dim higher as string

    Public Sub Main()

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

        no1 = Console.Readline()

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

        no2 = Console.Readline()

        if no1 > no2 Then

            'true side

            higher = no1

            'false side

        else

            higher = no2

        end if

        Console.Write("The higher No. is " & Higher)

    End Sub

End Module