Do Until/Loop (2) : Do Until « Statements « VB.Net Tutorial

1. VB.Net Tutorial
2. Statements
3. Do Until

Module Tester

    Sub Main()
        Dim product As Integer = 2

        Do Until product > 1000
            Console.Write("{0}  ", product)
            product = product * 2
        Loop

        Console.WriteLine("Smallest power of 2 " & _
           "greater than 1000 is {0}", product)
    End Sub 

End Module

2  4  8  16  32  64  128  256  512  Smallest power of 2 greater than 1000 is 1024