Imports System

'Programa de suma 

Public Module Module1

    Public Sub Main()

        DIM x as integer

        DIM contador as integer

        DIM suma as integer

        dim numero as integer

        suma = 0

        Console.WriteLine("Cuantos numeros desea sumar")

        x = console.ReadLine()

        for contador = 1 to x step 1 

        console.WriteLine("Ingrese Numero")

        numero = console.ReadLine()

        suma = suma + numero

    next

    console.WriteLine("El resultado es "&suma)

    End Sub

End Module