RosettaCodeData/Task/Integer-overflow/Visual-Basic/integer-overflow-4.vb
2017-09-25 22:28:19 +02:00

3 lines
106 B
VB.net

On Error GoTo 0
i = 2147483647 + 1 'Run-time error '6' : Overflow
Debug.Print i