Imports System
Public Class MainClass
' Example of exception handling
Public Shared Function SafeDivide(a As Integer, b As Integer) As Integer
Try
Return a \ b ' Integer division
Catch ex As DivideByZeroException
Console.WriteLine("Cannot divide by zero")
Return 0 ' fallback value
Finally
' Always runs, even if an exception occurs
Console.WriteLine("Operation complete")
End Try
End Function
Public Shared Sub Main(args As String())
Console.WriteLine(SafeDivide(9, 3) & Environment.NewLine)
Console.WriteLine(SafeDivide(9, 0) & Environment.NewLine)
Console.WriteLine(SafeDivide(0, 9) & Environment.NewLine)
Console.WriteLine(SafeDivide(0, 0) & Environment.NewLine)
End Sub
End Class
' run:
'
' Operation complete
' 3
'
' Cannot divide by zero
' Operation complete
' 0
'
' Operation complete
' 0
'
' Cannot divide by zero
' Operation complete
' 0
'