Във VBA можете да излезете от Do цикъл с помощта на Излезте от Do команда.
| 1 | Излезте от Do |
Когато изпълнението на кода дойде Излезте от Do, кодът ще излезе от цикъла Do и ще продължи с първия ред след цикъла.
Ако искате да научите как да излезете от цикъла For, щракнете върху тази връзка: VBA Изход за
Излезте от цикъл, когато условие е изпълнено
В примера по -долу ще видите как да излезете от Do цикъл, когато е изпълнено определено условие. Ще циклираме и увеличаваме стойността на променливата i с 1 във всяка итерация. Когато става въпрос за 6, искаме да излезем от цикъла и да върнем поле за съобщение. Ето кода:
| 1234567891011 | Dim i As IntegerНаправете, докато i <10i = i + 1Ако i = 6, тогаваИзлезте от DoКрай АкоЦикълMsgBox "Стойността е" & i |
Първо, влизаме в Do Loop, ако стойността на i е по -малка от 10:
| 123 | Направете, докато i <10Цикъл |
В тялото на цикъла увеличаваме стойността на i с 1:
| 1 | i = i + 1 |
След това проверяваме дали стойността на i е равна на 6, като използваме командата If. Ако стойността е 6, излизаме от цикъла Do и отиваме на първия ред след цикъла:
| 123 | Ако i = 6, тогаваИзлезте от DoКрай Ако |
Първият ред на кода, който ще бъде изпълнен след излизане от цикъла Do, е полето със съобщение със стойността i:
| 1 | MsgBox "Стойността е" & i |
Ако изпълните този код в Режим на отстраняване на грешки, ще видите, че ще премине през цикъла 6 пъти. В 6th итерация, стойността на променливата i става 6 и кодът влиза в тялото If. Сега тялото на цикъла Do е излязло. След това изскачащите прозорци MsgBox със стойността на i:
