Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
Module Program
Sub Main()
Dim lower = 1,
upper = 9,
increment = 2
For i = lower To upper Step increment
Console.WriteLine(i)
upper += 1
increment -= 1
Next
End Sub
End Module
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment