While...End While

Se trata del tipo más sencillo, ejecuta las líneas de código que contiene, mientras que la expresión situada junto a While devuelva Verdadero. Veamos su sintaxis en el Código fuente 132.

While Expresión
' código
' .....
End While

Código fuente 132

Y a continuación, un ejemplo en el Código fuente 133.

Sub Main()

Dim Valor As Integer

Dim Contador As Integer

Console.WriteLine("Introducir un número")

Valor = Console.ReadLine()

Console.WriteLine("Mostrar en consola todos los números desde 1 hasta el

introducido")

While Contador < Valor

Console.Write("-" & Contador)

Contador += 1

End While

Console.ReadLine()

End Sub

Código fuente 133