RosettaCodeData/Task/Integer-overflow/Visual-Basic/integer-overflow-4.vb
2023-07-01 11:58:00 -04:00

3 lines
106 B
VB.net

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