VB.Net by API/System/ArithmeticException

ArithmeticException.Message

  
Module Module1
    Sub Main()
            Try
                AddNumbers(1, 2)
            Catch Except As Exception
                Console.WriteLine("Call generated error: " & Except.Message)
            End Try
    End Sub
    Function AddNumbers(ByVal A As Integer, ByVal B As Integer) As Integer
        Try
            Throw New ArithmeticException()
        Catch Except As Exception
            Console.WriteLine(Except.Message)
        End Try
    End Function
End Module