Data Types VB.Net

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