Do...Loop Statement

조건이 True이거나 조건이 True가 될 때까지 Do 및 Loop 문 사이의 문을 반복합니다.

구문

Do [{While | Until} condition = True]

문 블록

[Exit Do]

문 블록

Loop

또는

Do

문 블록

[Exit Do]

문 블록

Loop [{While | Until} condition = True]

매개 변수/요소

Condition: True 또는 False를 평가하는 비교, 숫자 또는 문자열 식입니다.

문 블록: 조건이 True인 동안 또는 True가 될 때까지 반복할 문입니다.

Do...Loop 문은 특정 조건이 True인 동안 또는 True가 될 때까지 루프를 실행합니다. Do 또는 Loop 문 다음에 루프를 종료하기 위한 조건을 입력해야 합니다. 다음의 예는 유효한 문 결합을 보여 줍니다.

구문

Do While condition = True

...문 블록

Loop

Do While 및 Loop 문 사이의 문 블록을 조건이 True일 동안 반복합니다.

Do Until condition = True

...문 블록

Loop

Do Until 및 Loop 문 사이의 문 블록을 조건이 False일 동안 반복합니다.

Do

...문 블록

Loop While condition = True

Do 및 Loop 문 사이의 문 블록을 조건이 True일 동안 반복합니다.

Do

...문 블록

Loop Until condition = True

Do 및 Loop 문 사이의 문 블록을 조건이 True가 될 때까지 반복합니다.

루프를 무조건 종료하려면 Exit Do 문을 사용합니다. 이 문은 Do...Loop 문에서 임의의 위치에 추가할 수 있습니다. 또한 다음과 같이 If...Then 구조를 사용하여 종료 조건을 지정할 수도 있습니다.

Do...

문

If condition = True Then Exit Do

문

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