Imports System

Public Module Module1

    Public Sub Main()

        Dim icounter as Integer

        for icounter = 1 to 10

        console.Writeline(icounter*2)

    next ( icounter)

    End Sub

End Module