RosettaCodeData/Task/Loops-For-with-a-specified-step/Visual-Basic-.NET/loops-for-with-a-specified-step-1.vb

Imports System.Console
Module Program
    Sub Main()
        For i = 2 To 8 Step 2
            Write($"{i}, ")
        Next
        WriteLine("who do we appreciate?")
    End Sub
End Module