Data Types VB.Net

Imports System
Imports Microsoft.VisualBasic
Module DecimalToU_Int64Demo
    ' Convert the Decimal argument; catch exceptions that are thrown.
    Sub DecimalToU_Int64( argument As Decimal )
        Dim Int64Value    As Object
        Dim UInt64Value   As Object
        
        Try
            Int64Value = Decimal.ToInt64( argument )
        Catch ex As Exception
            Console.WriteLine( ex )
        End Try
        Try
            UInt64Value = Decimal.ToUInt64( argument )
        Catch ex As Exception
            Console.WriteLine( ex )
        End Try
        Console.WriteLine( Int64Value )
        Console.WriteLine( UInt64Value )
    End Sub
    Sub Main( )
        DecimalToU_Int64( 123D )
    End Sub 
End Module