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

Home
VBA / Excel / Access / Word
1.Access
2.Application
3.Data Type
4.Data Type Functions
5.Date Functions
6.Excel
7.File Path
8.Forms
9.Language Basics
10.Math Functions
11.Outlook
12.PowerPoint
13.String Functions
14.Windows API
15.Word
16.XML
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Language Basics » Do While 
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.
java2s.com  |  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.