Do...Loop Statement

āĻļāĻ°ā§āĻ¤āĻŸāĻŋ True āĻšāĻ˛ā§‡ āĻ…āĻĨāĻŦāĻž True āĻ¨āĻž āĻšāĻ“ā§ŸāĻž āĻĒāĻ°ā§āĻ¯āĻ¨ā§āĻ¤ Do āĻāĻŦāĻ‚ āĻ˛ā§āĻĒ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

āĻ¸āĻŋāĻ¨āĻŸā§āĻ¯āĻžāĻ•ā§āĻ¸

Do [{While | Until} condition = True]

āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ•

[Exit Do]

āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ•

Loop

or

Do

āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ•

[Exit Do]

āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ•

Loop [{While | Until} condition = True]

āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°/āĻāĻ˛āĻŋāĻŽā§‡āĻ¨ā§āĻŸ

āĻ…āĻŦāĻ¸ā§āĻĨāĻž: āĻāĻ•āĻŸāĻŋ āĻ¤ā§āĻ˛āĻ¨āĻžāĻŽā§‚āĻ˛āĻ•, āĻ¸āĻ‚āĻ–ā§āĻ¯āĻžāĻ¸ā§‚āĻšāĻ• āĻ…āĻĨāĻŦāĻž āĻ¸ā§āĻŸā§āĻ°āĻŋāĻ‚ āĻāĻ•ā§āĻ¸āĻĒā§āĻ°ā§‡āĻļāĻ¨, āĻ¯āĻž āĻšā§Ÿ True āĻ…āĻĨāĻŦāĻž False āĻšāĻŋāĻ¸ā§‡āĻŦā§‡ āĻŽā§‚āĻ˛ā§āĻ¯āĻžā§ŸāĻŋāĻ¤ āĻšā§ŸāĨ¤

āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ•: āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻ¯āĻž āĻļāĻ°ā§āĻ¤āĻŸāĻŋ True āĻšāĻ˛ā§‡ āĻ…āĻĨāĻŦāĻž True āĻ¨āĻž āĻšāĻ“ā§ŸāĻž āĻĒāĻ°ā§āĻ¯āĻ¨ā§āĻ¤ āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°āĻ¤ā§‡ āĻšāĻžāĻ¨āĨ¤

āĻāĻ•āĻŸāĻŋ āĻ¨āĻŋāĻ°ā§āĻĻāĻŋāĻˇā§āĻŸ āĻļāĻ°ā§āĻ¤ True āĻ¨āĻž āĻšāĻ“ā§ŸāĻž āĻĒāĻ°ā§āĻ¯āĻ¨ā§āĻ¤ Do...Loop āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸāĻŸāĻŋ āĻšāĻžāĻ˛āĻžāĻ¨ā§‹ āĻšā§ŸāĨ¤ āĻ…āĻŦāĻļā§āĻ¯āĻ‡ Do āĻ…āĻĨāĻŦāĻž Loop āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻ…āĻ¨ā§āĻ¸āĻ°āĻŖ āĻ•āĻ°ā§‡ āĻ˛ā§āĻĒ āĻĨā§‡āĻ•ā§‡ āĻĒā§āĻ°āĻ¸ā§āĻĨāĻžāĻ¨ā§‡āĻ° āĻļāĻ°ā§āĻ¤ āĻ¸āĻ¨ā§āĻ¨āĻŋāĻŦā§‡āĻļ āĻ•āĻ°āĻžāĻ¤ā§‡ āĻšāĻŦā§‡āĨ¤ āĻ¨āĻŋāĻšā§‡āĻ° āĻ‰āĻĻāĻžāĻšāĻ°āĻŖāĻ¸āĻŽā§‚āĻš āĻšāĻ˛ā§‹ āĻŦā§ˆāĻ§ āĻ¸āĻŽāĻžāĻšāĻžāĻ°:

āĻ¸āĻŋāĻ¨āĻŸā§āĻ¯āĻžāĻ•ā§āĻ¸

Do While condition = True

...statement block

Loop

āĻļāĻ°ā§āĻ¤āĻŸāĻŋ āĻ¯āĻĻāĻŋ True āĻ¨āĻž āĻšā§Ÿ āĻ¤āĻžāĻšāĻ˛ā§‡ Do While āĻāĻŦāĻ‚ āĻ˛ā§āĻĒ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ• āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

Do Until condition = True

...statement block

Loop

āĻļāĻ°ā§āĻ¤āĻŸāĻŋ āĻ¯āĻĻāĻŋ false āĻ¨āĻž āĻšā§Ÿ āĻ¤āĻžāĻšāĻ˛ā§‡ Do āĻāĻŦāĻ‚ āĻ˛ā§āĻĒ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ• āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

Do

...statement block

Loop While condition = True

āĻļāĻ°ā§āĻ¤āĻŸāĻŋ āĻ¯āĻĻāĻŋ True āĻ¨āĻž āĻšā§Ÿ āĻ¤āĻžāĻšāĻ˛ā§‡ Do āĻāĻŦāĻ‚ āĻ˛ā§āĻĒ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ• āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

Do

...statement block

Loop Until condition = True

āĻļāĻ°ā§āĻ¤āĻŸāĻŋ True āĻ¨āĻž āĻšāĻ“ā§ŸāĻž āĻĒāĻ°ā§āĻ¯āĻ¨ā§āĻ¤ Do āĻāĻŦāĻ‚ āĻ˛ā§āĻĒ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸ āĻŦā§āĻ˛āĻ• āĻĒā§āĻ¨āĻ°āĻžāĻŦā§ƒāĻ¤ā§āĻ¤āĻŋ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

āĻļāĻ°ā§āĻ¤āĻšā§€āĻ¨āĻ­āĻžāĻŦā§‡ āĻ˛ā§āĻĒāĻŸāĻŋ āĻ¸āĻŽāĻžāĻĒā§āĻ¤ āĻ•āĻ°āĻžāĻ° āĻœāĻ¨ā§āĻ¯ Exit Do āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸāĻŸāĻŋ āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻ•āĻ°ā§āĻ¨āĨ¤ āĻ†āĻĒāĻ¨āĻŋ Do...Loop āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸā§‡āĻ° āĻ¯ā§‡āĻ•ā§‹āĻ¨ā§‹ āĻ¸ā§āĻĨāĻžāĻ¨ā§‡ āĻāĻ‡ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸāĻŸāĻŋ āĻ¯ā§‹āĻ— āĻ•āĻ°āĻ¤ā§‡ āĻĒāĻžāĻ°ā§‡āĻ¨āĨ¤ āĻ†āĻĒāĻ¨āĻŋ āĻ¨āĻŋāĻŽā§āĻ¨āĻ°ā§‚āĻĒā§‡ If...Then āĻ•āĻžāĻ āĻžāĻŽā§‹ āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻ•āĻ°ā§‡ āĻĒā§āĻ°āĻ¸ā§āĻĨāĻžāĻ¨ āĻ¸ā§āĻŸā§‡āĻŸāĻŽā§‡āĻ¨ā§āĻŸāĻŸāĻŋ āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŖ āĻ•āĻ°āĻ¤ā§‡ āĻĒāĻžāĻ°ā§‡āĻ¨:

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

Please support us!