using System;
 
public class clsConvertToUInt64
{
 
    public void Main()
    {
 
 
        //********************************************************************************
        // Purpose: Converts numbers into ULong data type - ULong data type is a
        // 64-bit (8-byte) unsigned integer that can hold values from 0 to
        // 18,446,744,073,709,551,615 (unsigned). Rounds fractions to whole numbers
        // 
        // Syntax: 	Convert.ToUInt64(expression)
        //
        // Parameter1: expression -   0 to 0 through 18,446,744,073,709,551,615 (unsigned) - will throw 
        // Exception() if negative number is passed in.  Rounds fractions to whole numbers
        //
        // Result: ULong - 64-bit (8-byte) unsigned integer
        //
        // Quick Example: Convert.ToUInt64(1.33) // Returns 1
        //
        //********************************************************************************
        // This example is from http://idealprogrammer.com
 
        Console.WriteLine("Example #1: 	Convert.ToUInt64(1.33)");
 
        ulong ULong1 = Convert.ToUInt64(1.33);
 
        Console.WriteLine(ULong1); // Returns 1
 
        //write blank line to make output easier to read
        Console.WriteLine();
 
        Console.WriteLine("Example #2: 	Convert.ToUInt64(3.4)");
 
        ulong ULong2 = Convert.ToUInt64(3.4);
 
        Console.WriteLine(ULong2); // Returns 3
        //write blank line to make output easier to read
        Console.WriteLine();
 
        Console.WriteLine("Example #3: 	Convert.ToUInt64(5.5)");
 
        ulong ULong3 = Convert.ToUInt64(5.5);
 
        Console.WriteLine(Convert.ToUInt64(ULong3)); // Returns 6
 
        //Prevent console from closing before you press enter
        Console.ReadLine();
 
    }
 
}

Module Module1
 
    Sub Main()
 
 
        Dim myclsConvertToUInt64 As New clsConvertToUInt64
        myclsConvertToUInt64.Main()
 
 
 
    End Sub
 
End Module