Language Basics VisualBasic Script

Sub ReverseForNext() 
    Dim n As Integer 
    For n = 50 To 1 Step -2 
        Debug.Print n 
    Next 
End Sub