Imports System

Public Module Module1

    Public Sub Main()

        dim count as integer

        For count = 1 to 999 step 2

        Console.WriteLine(count)

    Next

    End Sub

End Module