Hallar la suma de dos números

Hallar la suma de dos números:

Module Module2

    Dim NUM1, NUM2, SUMA As Integer

    Sub Main()

        Write("Ingrese Primer Número: ")

        NUM1 = ReadLine()

        Write("Ingrese Primer Segundo: ")

        NUM2 = ReadLine()

        SUMA = NUM1 + NUM2

        WriteLine()

        WriteLine("La suma es : " & SUMA)

        WriteLine()

        WriteLine("Pulse Enter para continuar....")

        ReadLine()

    End Sub

End Module