For 카운터 = 시작값 To 끝값 [Step 증가분]
명령문
Next
지정된 횟수만큼 명령문을 반복 실행하는 명령어입니다.
다음 예와 같이 STEP명령이 생략된 경우에는 1씩 증가합니다. STEP명령을 음수 값으로 지정하는 경우에는 시작값이 끝값보다 커야 합니다.
Dim K As Long For K=0 To 10 Debug Dp(K),CR Next For K=10 To 0 Step –1 ‘ STEP을 음수로 하면 감소합니다. Debug Dp(K),CR Next
FOR문을 수행하는 도중 탈출하고싶다면, EXIT FOR문을 사용합니다.
ForK=0 To 10 Debug Dp(K),CR If K=8 Then Exit For ‘ EXIT FOR를 만나면 FOR LOOP를 탈출합니다. Next
NEXT뒤에는 아무것도 적어주지 않습니다.
FOR문의 카운터 변수는 카운터 할 값의 범위를 충분히 커버할 수 있는 변수 형으로선언해야 합니다.
예를 들어 255까지 카운트 하는 경우에도 256까지 카운트할 수 있는 INTEGER형을 사용해야 합니다.
내부적으로 K에 256을 저장한 뒤 비교하기 때문입니다.
DimK As Byte For K=0 To 255 Debug Dp(K),CR ‘K를 Byte형으로 했을 경우 무한루프가 됩니다. Next
STEP –1을 사용해서 스텝 다운하는 경우에도 음수 값을 저장할 수 있는 LONG형 변수를 사용해야 합니다.
DimLK As Long For LK=255 To 0 Step –1 ‘LK에 –1를 저장한 뒤 비교하기 때문에 Long형 사용 Debug Dp(LK),CR Next
다음과 같은 소스를 가지고 어떻게 실행되는지 한번 보겠습니다.
Const Device = CB280 Dim K As Long Wait 1500 For K=0 To 10 Debug Dp(K),Cr Wait 500 Next