dim f& 'Объявление переменной F с типом Long (можно и так: dim f as Long )
for f = -10 to 10 step 2 'Инициализация цикла с шагом добавления =2
'Тело цикла здесь можно разместить ваши инструкции
next
'@@@@@@@@@@@@@@@@@@@
f= - 10: do 'Присвоение f и инициализация цикла
if f >= 10 then exit do 'Условие выхода
f=f + 2
loop
'@@@@@@@@@ П о с л е с л о в и е ) @@@@@@@@@@
f= - 10: do 'Присвоение f и инициализация цикла
f=f + 2
loop until f >= 10 'Условие выхода
'@@@@@@@@@@@@@@@@@@@
f= - 10: do while f< 10 'продолжать цикл пока f<10
f=f+2
loop 'Закрывающий оператор
'@@@@@@@@@@@@@@@@@@@
'Можно ещё и так:
f= - 10: while f< 10 'продолжать цикл пока f<10
f=f+2
wend 'Закрывающий оператор