Imports System
'ESTRTRUCTURA FOR
'REALIZADO POR: VICTORIA
Public Module Module1
'DECLARAR UN CONTADOR
DIM CONTADOR AS INTEGER
'DECLARAR INCREMENTAL
DIM INCREMENTAL AS INTEGER
Public Sub Main()
Console.WriteLine("EJEMPLO FOR")
CONSOLE.WriteLine("CUANTOS MENSAJES DESEA MOSTRAR: ")
CONTADOR = CONSOLE.ReadLine()
'CICLO FOR
FOR INCREMENTAL = 1 TO CONTADOR
CONSOLE.WriteLine("BUEN DIA " &INCREMENTAL &"/"&CONTADOR)
NEXT
End Sub
End Module