Mega Code Archive
Continue Do
<![CDATA[
public class Test
public Shared Sub Main
Dim j As Integer
For i As Integer = 1 To 3
j = 0
Do While j < 3
j += 1
For k As Integer = 1 To 3
Dim test1 As Boolean = k = 2
If test1 Then Continue For ' Continues the For K loop.
Dim test2 As Boolean = i = j
If test2 Then Continue Do ' Continues the Do.
Console.WriteLine(i & ", " & j & ", " & k)
Next k
Loop
Next i
End Sub
End class
1, 2, 1
1, 2, 3
1, 3, 1
1, 3, 3
2, 1, 1
2, 1, 3
2, 3, 1
2, 3, 3
3, 1, 1
3, 1, 3
3, 2, 1
3, 2, 3
]]>