For counter = start To end [ Step step ]

   [ statements ]

   [ Exit For ]

   [ statements ]

Next

s = ""

For i = 0 To 10 Step 2

   If s <> "" Then

      s = s + ","

   End If

   s = s + CStr(i)

Next