Using the Do...While Loop : Do While « Language Basics « VBA / Excel / Access / Word





Using the Do...While Loop

 
Sub AskForPassword()
    Dim pWord As String

    pWord = ""
    Do While pWord <> "PASS"
        pWord = InputBox("What is the Report password?")
    Loop
        MsgBox "You entered the correct Report password."
End Sub

 










Related examples in the same category

1.Do Loop While
2.Use Integer variable as the loop control variable
3.Do while loop
4.Using the Do...While Loop with a Condition at the Bottom of the Loop
5.Use if statement in a do loop
6.Put InputBox in a Do Loop
7.A counting variable I is initialized just prior to the loop and incremented inside the loop
8.To ensure that the code block executes at least once, place the While keyword and conditional statement at the end of the Do/Loop
9.Execute the code block until the conditional statement is True.