VB.net -模块级别的定义如何抛出异常

Module MyModule
    Sub Main()
        Try
            ' 模块级别的定义
            Dim myVariable As Integer = 10
            Dim result As Integer = DivideByZero(myVariable)
            Console.WriteLine("Result: " & result)
        Catch ex As Exception
            Console.WriteLine("Error: " & ex.Message)
        End Try
    End Sub

    Function DivideByZero(ByVal num As Integer) As Integer
        If num = 0 Then
            Throw New DivideByZeroException("Cannot divide by zero.")
        End If
        Return 100 / num
    End Function
End Module