Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Hello World")

        dim i0 as integer, i1 as integer

        dim paso as integer

        i0 = 10

        i1 = 1

        paso = -2

        for i = i0 To i1 Step paso

        Console.WriteLine(i)

        next

    End Sub

End Module