Imports System

Public Module Module1

    Public Sub Main()

        Dim  n1, n2 as integer

        Console.WriteLine("Ingrese un valor")

        n1 = Cint(Console.ReadLine())

        Console.WriteLine("Ingrese un valor")

        n2 = Cint(Console.ReadLine())

        call resta(n1,n2)

    End Sub

    Sub resta(num1 as integer, num2 as integer)

    Dim res as integer

    res = num1 - num2

    Console.WriteLine("La respuesta de la resta es : {0}", res)

    End sub

End Module