Innhold

# Gjør ... Loop Statement

Gjentar uttrykkene mellom Do og Loop-uttrykket mens betingelsen er Sann eller til betingelsen blir Sann.

### Syntaks:

      Do {While | Until} condition = True
      ' Do While: Uttrykksblokken gjentas så lenge betingelsen er sann
      ' Gjør til: Uttrykksblokken gjentas så lenge betingelsen er Usann
         statements
         [Exit Do]
         statements
      Loop

      Do
         statements
         [Exit Do]
         statements
      ' Loop While: Uttrykksblokken gjentas så lenge betingelsen er sann
      ' Loop Til: Uttrykksblokken gjentas til betingelsen er sann
      Loop {While | Until} condition = True

### Parametre:

Do...Loop-uttrykket kjører en loop så lenge, eller til, en viss betingelse er Sann. Betingelsen for å gå ut av loopen må angis etter enten Do- eller Loop-uttrykket. Eksemplene ovenfor er gyldige kombinasjoner.

tilstand: En sammenligning, numerisk eller grunnleggende uttrykk, som evalueres til enten Sann eller Usann.

Uttrykk: Uttrykk du vil gjenta mens eller til en betingelse er sann.

Bruk Exit Do-setningen for å avslutte loopen uten betingelser. Du kan legge til denne setningen hvor som helst i en Do...Loop-setning. Du kan også definere en utgangsbetingelse ved å bruke If...Then-strukturen som følger:

      Do...
         statements
         If condition = True Then Exit Do
         statements
      Loop...

### Eksempel:

    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

Lignende emner

For, Velg Case eller While uttrykk

Iif eller Switch funksjoner