In VB.NET we can use a Do Until loop to mean "continue until the condition is matched." A Do While loop can be used in the same way.
Module Module1
Sub Main()
Dim index As Integer = 0
Dim array() As Integer = New Integer() {10, 20, 30, 40}
' Use "not equals" operator.
Do While array(index) <> 30
Console.WriteLine(
"[WHILE] NOT 30: {0}", array(index))
index += 1
Loop
' Use "do until" loop.
index = 0
Do Until array(index) = 30
Console.WriteLine(
"[UNTIL] NOT 30: {0}", array(index))
index += 1
Loop
End Sub
End Module
[WHILE] NOT 30: 10
[WHILE] NOT 30: 20
[UNTIL] NOT 30: 10
[UNTIL] NOT 30: 20