' Visual Basic 2008 9.0 .NET Examples - Iterations - Introduction to Visual Basic : 
Module Exercise4Solution
    Sub Main()
        Dim number, sum As Integer
        '
        number = Console.ReadLine()
        Do Until number = 0
            Console.WriteLine("+")
            sum = sum + number
            number = Console.ReadLine()
        Loop
        Console.WriteLine("=")
        Console.WriteLine(sum)
        '
        Console.ReadLine()
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.