Language Basics VB.Net

  1. Home
  2. VB.Net
  3. Language Basics
  4. Try and catch Exception
Imports System
Imports System.Diagnostics
Public Class MainClass
    Shared Sub Main()
        Try
            Dim i As Integer = CInt("bad value")
        Catch ex As InvalidCastException
            Dim txt As String = "InvalidCastException"
            MsgBox(txt)
        Catch ex As Exception
            Dim txt As String = "Exception"
            MsgBox(txt)
        End Try
    End Sub
End Class