While loops keep looping while the condition they test remains true, so you use a While loop if you have a condition that will become false when you want to stop looping. Here's the While loop's syntax (note that you used to end this loop with Wend in VB6 and before—that's changed to End While now):
While condition [statements] End While
And here's an example putting While to work:
Sub CheckWhile() Dim intCounter As Integer = 0 Dim intNumber As Integer = 10 While intNumber > 6 intNumber -= 1 intCounter += 1 End While MsgBox("The loop ran " & intCounter & " times.") End Sub
And here's what you see when you run this code:
The loop ran 4 times. Press any key to continue
Tip |
Many Visual Basic functions, like EOF—which is true when you've reached the end of a file while reading from it—are explicitly constructed to return values of True or False so that you can use them to control loops such as Do and While loops. |