Exception number needed instead of message string

I want to know if the exception is a "memoryoverflow exception" for example. But if the language on the Operating system is not English but Chinese for example or German, the message changes. And I cannot look the the message string anymore. On MSDN I have not found a exception number to work with. How to find a exception number?

   Public Shared Sub Main()
      Dim x As Integer = 0
      Try
         Dim y As Integer = 100 / x
      Catch e As Exception'here, 123 is not working
         if e is ArithmeticException(123) then Console.WriteLine("Generic Exception Handler: {0}", e.ToString())
      End Try
   End Sub

Example (look at the <-- line)

   Try
                    m_DxFilGraphManager.Run()
                Catch ex As System.Runtime.InteropServices.COMException
                    If ex.Message.Contains("0x800705AA") Then '<-- Bad methode. How to do it better?
                        Return "#ERROR: Can not start capturing. It seems to be a possiblity to change the IEEE 1394 bus host controler system driver in your device manager to 'legacy / alt'. " & ex.Message
                    Else
                        Return "#ERROR: " & ex.Message
                    End If
      End Try

Use proper exception handling:

Public Shared Sub Main()
  Dim x As Integer = 0
  Try
     Dim y As Integer = 100 / x
  Catch e As ArithmeticException
     // handle ArithmeticException
  Catch e As Exception
     // handle Exception
  End Try
End Sub

Catching Exception is bad practice - I suggest reading the documentation.

There are several specific exception types you can use - DivideByZeroException, NotFiniteNumberException derive from ArithmeticException.