For i = 0 To 2 MsgBox "Loop 1: " & i Next For i = 0 To 2 Step 2 MsgBox "Loop 2: " & i Next For i = 2 To 0 Step -1 MsgBox "Loop 3: " & i Next For i = 0 To 2 MsgBox "Loop 4: " & i If i = 1 Then Exit For Next