Mega Code Archive

 
Categories / VB.Net / Data Types
 

Convert Long to Integer

Imports System Imports Microsoft.VisualBasic Module MainClass     Sub Main( )         Dim lNumber As Long = 9999999         Try            Dim number1 As Integer = CInt(lNumber)            Console.WriteLine(number1)         Catch e As OverflowException            Console.WriteLine("{0} is out of range of an Int32.", lNumber)         End Try     End Sub  End Module