#COMPILE EXE "s35_exit_iterate.exe"
' Sample: EXIT and ITERATE in loops
FUNCTION PBMAIN() AS LONG
    DIM i AS LONG
    PRINT "Skip multiples of 3:"
    FOR i = 1 TO 10
        IF i MOD 3 = 0 THEN ITERATE FOR
        PRINT i;
        IF i >= 8 THEN EXIT FOR
    NEXT i
    PRINT
    FUNCTION = 0
END FUNCTION
