VB.NET CODE OF EXCEPTION HANDLING

Module Module1
    Sub Main()
        Dim index As Integer
        Dim val As Integer = 30
        Dim a(5) As Integer
        Try
            index = Convert.ToInt32("abcd")
            a(index) = val
            Console.Write("Value in Range")

        Catch e As FormatException
            Console.Write("BAD FORMAT")


        Catch e As IndexOutOfRangeException
            Console.Write("Index Out OF Bound")

        End Try
 End Sub
End Module
output
Bad Format