'Visual Basic 2010 Geneste Structuren Basisstructuren van Algoritmes Module Example2 Sub Main() Dim baseValue As Integer = 1 ' Do While baseValue < 10 Console.WriteLine(baseValue) baseValue = baseValue + 1 Loop ' Console.ReadLine() End Sub End Module 'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden. 'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.