Question

How to continue outer loop in VB.NET

Answer 1

Imports System

Class Program
	Public Shared Sub Main()
        For outer As Integer = 0 To 4 - 1
            For inner As Integer = 0 To 3 - 1
                If inner = 2 Then
                    GoTo ContinueOuter
                End If

                Console.WriteLine($"Outer: {outer}, Inner: {inner}")
            Next

ContinueOuter:
            Console.WriteLine($"continue_outer: {outer}")
        Next
    End Sub
End Class



' run:
'
' Outer: 0, Inner: 0
' Outer: 0, Inner: 1
' continue_outer: 0
' Outer: 1, Inner: 0
' Outer: 1, Inner: 1
' continue_outer: 1
' Outer: 2, Inner: 0
' Outer: 2, Inner: 1
' continue_outer: 2
' Outer: 3, Inner: 0
' Outer: 3, Inner: 1
' continue_outer: 3
' 
 

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System

Public Class Program
    Public Shared Sub Main(ByVal args As String())
        Dim arr1 As Integer() = {4, 5, 1, 1, 6, 7, 0, 1, 1, 1, 8}
        Dim arr2 As Integer() = {9, 1, 2}
        Dim nval2 As Integer = 0

        For Each val1 As Integer In arr1

            For Each val2 As Integer In arr2
                nval2 = val2
                If val2 = val1 Then Exit For
            Next

            If nval2 = val1 Then Continue For
            Console.Write(val1 & " ")
        Next
    End Sub
End Class



' run:
'
' 4 5 6 7 0 8 
' 
 

 

70+ SQL courses for beginners and professionals