Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

The loop iterates just three times outputting the numbers 10, 5, and 0 in a message box

Sub loopDemo4()     Dim I As Integer     For I = 10 To 0 Step -5      '3 iterations: 10, 5, and 0           Debug.Print I     Next I End Sub