Mega Code Archive

 
Categories / VB.Net / Data Types
 

BigInteger Equals Method

Imports System Imports System.IO Imports System.Numerics Imports System.Runtime.Serialization.Formatters.Binary Module Example    Public Sub Main()         Dim bigIntValue As BigInteger                   Dim byteValue As Byte = 16         bigIntValue = New BigInteger(byteValue)         Console.WriteLine(bigIntValue.Equals(byteValue))                  Dim sbyteValue As SByte = -16         bigIntValue = New BigInteger(sbyteValue)         Console.WriteLine(bigIntValue.Equals(sbyteValue))                  Dim shortValue As Short = 1233         bigIntValue = New BigInteger(shortValue)         Console.WriteLine(bigIntValue.Equals(shortValue))                  Dim ushortValue As UShort = 64000         bigIntValue = New BigInteger(ushortValue)         Console.WriteLine(bigIntValue.Equals(ushortValue))                  Dim intValue As Integer = -1603854         bigIntValue = New BigInteger(intValue)         Console.WriteLine(bigIntValue.Equals(intValue))                  Dim uintValue As UInteger = 1223300         bigIntValue = New BigInteger(uintValue)         Console.WriteLine(bigIntValue.Equals(uintValue))                  Dim longValue As Long = -123822229012         bigIntValue = New BigInteger(longValue)         Console.WriteLine(bigIntValue.Equals(longValue))    End Sub End Module