Imports System Imports System.Text Imports Microsoft.VisualBasic.Strings Imports System.Numerics
Class MainClass Public Shared Sub Main() Dim decimalValues() As Decimal = { -1.5, -1.1, 1.7d, 9}
For Each decimalValue As Decimal In decimalValues Dim number As New BigInteger(decimalValue)
Console.WriteLine(number)
Next