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