Imports System.Numerics
Imports System
Module Example
Public Sub Main()
Dim goodSByte As BigInteger = BigInteger.MinusOne
Dim sByteFromBigInteger As SByte
' Convert using CType function.
sByteFromBigInteger = CType(goodSByte, SByte)
Console.WriteLine(sByteFromBigInteger)
' Convert using CSByte function.
sByteFromBigInteger = CSByte(goodSByte)
Console.WriteLine(sByteFromBigInteger)
End Sub
End Module