A VBA -ban kiléphet a Do ciklusból a Kilépés Do parancs.
1 | Kilépés Do |
Amikor elérkezik a kód végrehajtása Kilépés Do, a kód kilép a Do ciklusból, és a ciklus utáni első sorral folytatódik.
Ha szeretné megtudni, hogyan léphet ki a For ciklusból, kattintson erre a linkre: VBA Exit For
Kilépés a hurokból, ha egy feltétel teljesül
Az alábbi példában látni fogja, hogyan léphet ki a Do ciklusból, ha egy bizonyos feltétel teljesül. Az it változó értékét 1 ismétléssel hurkoljuk és növeljük. Amikor a 6 -ról van szó, ki akarunk lépni a ciklusból, és vissza akarunk küldeni egy üzenetdobozt. Itt a kód:
1234567891011 | Dim i As IntegerTedd, amíg én <10i = i + 1Ha i = 6 akkorKilépés DoVége HaHurokMsgBox "Az érték" & i |
Először lépjünk be a Do Loopba, ha az i értéke kevesebb, mint 10:
123 | Tedd, amíg én <10Hurok |
A hurok törzsében növeljük az i értékét 1 -gyel:
1 | i = i + 1 |
Ezt követően az If paranccsal ellenőrizzük, hogy az i értéke 6 -tal egyenlő -e. Ha az érték 6, kilépünk a Do ciklusból, és a ciklus után az első sorba lépünk:
123 | Ha i = 6 akkorKilépés DoVége Ha |
A Do ciklusból való kilépés után végrehajtandó kód első sora az i értékű üzenetmező:
1 | MsgBox "Az érték" & i |
Ha végrehajtja ezt a kódot Hibakeresési mód, látni fogja, hogy 6 -szor megy keresztül a hurkon. A 6 -banth iteráció esetén az i változó értéke 6 lesz, és a kód bekerül az If törzsbe. Most a Do hurok törzse kilép. Ezt követően az MsgBox felugró ablakok i értékkel: