Convert.ToDecimal (Int32) converts 32-bit signed integer to decimal number.
Class Sample Public Shared Sub Main() Dim numbers() As Integer = { Int32.MinValue, -1000, 0, 1000, Int32.MaxValue } Dim result As Decimal
For Each number As Integer In numbers
result = Convert.ToDecimal(number)
Console.WriteLine("Converted the Int32 value {0} to the Decimal value {1}.", _
number, result)
Next End Sub 'Main