Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Nest if statement into a for statement

Sub forTest()     Dim intCounter As Integer          For intCounter = 1 To 10         If (intCounter Mod 2) = 0 Then             Debug.Print intCounter & " is an even number"         Else             Debug.Print intCounter & " is an odd number"         End If     Next End Sub