Language Basics VisualBasic Script

Sub ForSteps()
    Dim I As Integer
    For I = 0 To 10
      MsgBox (I)
    Next I
    For I = 0 To 10 Step 2
      MsgBox (I)
    Next I
    For I = 0 To 10 Step 3
      MsgBox (I)
    Next I
    For I = 10 To 0 Step -5
      MsgBox (I)
    Next I
End Sub