Mega Code Archive

 

Categories / VB.Net / Data Types

 

Converts a Decimal to a 64-bit signed integer

Module DecimalToU_Int64Demo     Public Sub DecimalToU_Int64(argument As Decimal)         Dim Int64Value As Object         Dim UInt64Value As Object         Try             Int64Value = CLng(argument)         Catch ex As Exception             Console.WriteLine(ex.GetType().Name)         End Try         ' Convert the argument to a ulong value.         Try             UInt64Value = CULng(argument)         Catch ex As Exception             Console.WriteLine(ex.GetType().Name)         End Try         Console.WriteLine(Int64Value)         Console.WriteLine(UInt64Value)     End Sub     Public Sub Main( )         DecimalToU_Int64(123d)     End Sub End Module