Imports System

Public Module Module1

    Public Sub Main()

        'EJEMPLO FOR 

        'REALIZADO POR: MARIANDRÉ PAREDES 

        DIM INCREMENTAL, CONTADOR AS INTEGER 

        CONSOLE.WriteLine("CUANTAS VECES DESEA VER EL MENSAJE:")

        CONTADOR = CONSOLE.ReadLine()

        FOR INCREMENTAL = 1 TO CONTADOR 

        CONSOLE.WriteLine("MENSAJE")

    NEXT 

    End Sub

End Module