LibreOffice 25.2 Hjelp
Gjentek uttrykka mellom Do og Loop så lenge vilkåret er SANN eller til vilkåret vertSANN.
  Do {While | Until} condition = True
  ' Do While: Blokka med uttrykket vert repetert så lenge vilkåret er SANN
  ' Do Until: Blokka med uttrykket vert repetert så lenge vilkåret er USANN
     statements
     [Exit Do]
     statements
  Loop
  Do
     statements
     [Exit Do]
     statements
  ' Loop While: Blokka med uttrykket vert repetert så lenge vilkåret er SANN
  ' Loop Until: Blokka med uttrykket vert repetert til vilkåret er SANN
  Loop {While | Until} condition = True
Uttrykket Do … Loop utfører ei løkke (loop) så lenge eller til eit bestemt vilkår er SANN. Vilkåret for å avslutta sløyfa må skrivast inn anten etter uttrykket Do eller Loop. Eksempelet ovanfor viser gyldige kombinasjonar.
condition: Ei samanlikning, eit nummerisk uttrykk eller eit BASIC-uttrykk som anten er Sann eller Usann.
statements: Uttrykk som du vil taka oppatt medan eller til eit vilkår er Sann.
Bruk uttrykket Exit Do for å avslutta løkka utan vilkår. Du kan setja inn dette uttrykket kvar som helst i eit Do … Loop-uttrykk. Du kan også definera eit «exit»-vilkår med If … Then set opp slik:
  Do...
     statements
     If condition = True Then Exit Do
     statements
  Loop...
Sub ExampleDoLoop
    Dim sFile As String
    Dim sPath As String
    sPath = "c:\"
    sFile = Dir$( sPath ,22)
    If sFile <> "" Then
        Do
            MsgBox sFile
            sFile = Dir$
        Loop Until sFile = ""
    End If
End Sub