Imports System
Imports Microsoft.VisualBasic
Module DecimalCtorULDemo
Sub CreateDecimal( value As UInt64, valToStr As String )
Dim decimalNum As New Decimal( value )
Dim ctor As String = String.Format( "Decimal( {0} )", valToStr )
Console.WriteLine( "{0,-33}{1,22}", ctor, decimalNum )
End Sub
Sub Main( )
CreateDecimal( Convert.ToUInt64( 999999999999999999 ),"999999999999999999" )
End Sub
End Module