Language Basics VB.Net Tutorial

public class Test
   public Shared Sub Main
        Try
            Dim i As Integer = CInt("bad value")
        Catch ex As InvalidCastException
            Dim txt As String = "InvalidCastException"
            Console.WriteLine(txt)
        Catch ex As Exception
            Dim txt As String = "Exception"
            Console.WriteLine(txt)
        End Try
   End Sub
End class
InvalidCastException