RosettaCodeData/Task/Exceptions/Visual-Basic-.NET/exceptions-2.vb

4 lines
44 B
VB.net

Sub foo()
Throw New MyException
End Sub