Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Iterates six times outputting the numbers 0, 2, 4, 6, 8, and 10 in a message box

Sub forLoop2()     Dim I As Integer          For I = 0 To 10 Step 2      '6 iterations: 0, 2, 4, 6, 8, and 10           Debug.Print I     Next I End Sub