VBA: ssa voit poistua Do -silmukasta käyttämällä Lopeta Do komento.
| 1 | Lopeta Do |
Kun koodin suoritus tulee Lopeta Do, koodi poistuu Do -silmukasta ja jatkaa ensimmäisellä rivillä silmukan jälkeen.
Jos haluat oppia poistumaan For -silmukasta, napsauta tätä linkkiä: VBA Exit For
Poistu silmukasta, kun ehto täyttyy
Alla olevassa esimerkissä näet, kuinka Do -silmukasta poistutaan, kun tietty ehto täyttyy. Kierrämme ja kasvatamme muuttujan i arvoa 1 jokaisella iteroinnilla. Kun tulee 6, haluamme poistua silmukasta ja palauttaa viestiruudun. Tässä on koodi:
| 1234567891011 | Dim i Kuten kokonaislukuTee kun olen <10i = i + 1Jos i = 6 niinLopeta DoLoppu JosSilmukkaMsgBox "Arvo on" & i |
Syötetään ensin Do Loop, jos i: n arvo on alle 10:
| 123 | Tee kun olen <10Silmukka |
Silmukan rungossa kasvatamme i: n arvoa 1:
| 1 | i = i + 1 |
Tämän jälkeen tarkistamme If -komennolla, onko i: n arvo 6. Jos arvo on 6, poistumme Do -silmukasta ja siirrymme silmukan jälkeen ensimmäiselle riville:
| 123 | Jos i = 6 niinLopeta DoLoppu Jos |
Do -silmukasta poistumisen jälkeen suoritettavan koodin ensimmäinen rivi on sanomalaatikko, jonka arvo on i:
| 1 | MsgBox "Arvo on" & i |
Jos suoritat tämän koodin Debug-tilassa, näet, että se kulkee silmukan läpi 6 kertaa. 6: ssath iteraatio, muuttujan i arvoksi tulee 6 ja koodi tulee If -runkoon. Nyt Do -silmukan runko poistuu. Tämän jälkeen MsgBox-ponnahdusikkunat, joiden arvo on i:
