Imports System

Public Module Module1

    Public Sub Main()

        Dim Num1 as Integer

        Console.WriteLine("escribe el primer numero")

        Num1=Console.ReadLine()

        Dim Num2 as Integer

        Console.WriteLine("escribe el segundo numero")

        Console.ReadLine()

        If (Num1 > Num2) Then

            Console.WriteLine("El mayor de los numeros es" & Num1)

        else

            Console.WriteLine("El mayor de los numeros es" & Num2)

        End If

    End Sub

End Module