Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. Using the Do Until Loop
Sub AskForPassword3() 
       Dim pWord As String 
       pWord = "" 
       Do Until pWord = "DADA" 
           pWord = InputBox("What is the Report password?") 
       Loop 
   End Sub