Imports System

Public Module Module1

    Public Sub Main()

        Dim Number1, Number2, Result As Integer

        Console.WriteLine("Please Enter Number1")

        Number1 = Console.ReadLine()

        Console.WriteLine("Please Enter Number2")

        Number2 = Console.ReadLine()

        Result = Number1 + Number2

        Console.WriteLine( Number1 & " + " & Number2 & " = " & Result)

    End Sub

End Module