Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Iterates four times outputting the numbers 0, 3, 6, and 9 in a message box

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