On Error go to line : Goto « Language Basics « VB.Net

1. VB.Net
2. Language Basics
3. Goto

On Error go to line

Imports System

Public Class MainClass
    
    Shared Sub Main(ByVal args As String())

        On Error GoTo LoadError
        LoadPayrollFile()
        On Error GoTo PrintError

        PrintPaychecks()

        Exit Sub
LoadError:
        Console.WriteLine("Error loading the file.")
        Exit Sub
PrintError:
        Console.WriteLine("Error printing.")
        Exit Sub

    End Sub
    Shared Private Sub LoadPayrollFile()
        Throw New ArgumentException("Error in subroutine LoadFile")
    End Sub

    Shared Private Sub PrintPaychecks()
        Throw New ArgumentException("Error in subroutine Print")
    End Sub

End Class

           
       

Related examples in the same category

1.	Goto a Label
2.	Use GOTO to deal with user input
3.	Goto Statement