Tuesday, January 4, 2011

Use IF in For

Dim i As Byte
For i = 1 To 100
       If i Mod 2 = 0 Then
              MsgBox(i)
       End If
Next

No comments:

Post a Comment