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

4 lines
98 B
VB.net

i=0
On Error Resume Next
i = 2147483647 + 1
Debug.Print i 'i=0