VB.Net Tutorial/Data Type/Overflows

Материал из VB Эксперт
Версия от 15:54, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Demonstrating overflows with and without checking

<source lang="vbnet">Class Tester

  Shared Sub Main()
     Try
        Dim number1 As Integer = Int32.MaxValue " 2,147,483,647
        Dim number2 As Integer = Int32.MaxValue " 2,147,483,647
        Dim sum As Integer = 0
        Console.WriteLine("number1: {0}" & vbCrLf & _
           "number2: {1}", number1, number2)
        Console.WriteLine("Sum integers in checked context:")
        sum = number1 + number2 " compute sum
        Console.WriteLine("Sum after operation: {0}", sum)
     Catch overflowExceptionParameter As OverflowException
        Console.WriteLine(overflowExceptionParameter.ToString())
     End Try
  End Sub

End Class</source>

number1: 2147483647
number2: 2147483647
Sum integers in checked context:
System.OverflowException: Arithmetic operation resulted in an overflow.
   at Tester.Main()