RosettaCodeData/Task/Integer-overflow/Visual-Basic/integer-overflow-4.vb

4 lines
106 B
VB.net
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
On Error GoTo 0
i = 2147483647 + 1 'Run-time error '6' : Overflow
Debug.Print i