Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Use if statement in a do loop

Sub SignIn2()         Dim secretCode As String         Do             secretCode = InputBox("Enter your secret code:")             If secretCode = "sp1045" Or secretCode = "" Then Exit Do         Loop While secretCode <> "sp1045"     End Sub