Language Basics VB.Net

Imports System
Imports System.Text 
Imports System.Text.RegularExpressions
Public Class MainClass
    Shared Sub Main(ByVal args As String())
             Try
                 Console.WriteLine("Open file here")
                 Dim a As Double = 5
                 Dim b As Double = 0
                 Console.WriteLine("{0} / {1} = {2}", a, b, DoDivide(a, b))
                 Console.WriteLine("This line may or may not print")
                 ' most derived exception type first
             Catch e As System.DivideByZeroException
                 Console.WriteLine("DivideByZeroException caught!")
             Catch
                 Console.WriteLine("Unknown exception caught!")
             Finally
                 Console.WriteLine("Close file here.")
             End Try
    End Sub
         ' do the division if legal
         Shared Public Function DoDivide( _
             ByVal a As Double, ByVal b As Double) As Double
             If b = 0 Then
                 Throw New System.DivideByZeroException( )
             End If
             If a = 0 Then
                 Throw New System.ArithmeticException( )
             End If
             Return a / b
         End Function 'DoDivide
    
End Class