Fix : Number Function « Data Type « VB.Net Tutorial

1. VB.Net Tutorial
2. Data Type
3. Number Function

Option Strict On

Public Module FixTest
   Public Sub Main()
      Dim arr() As Decimal = {12.6d, 12.1d, -12.1d, -12.6d}
      For Each num As Decimal In arr
         Console.WriteLine("Fix({0}): {1}", num, Fix(num))
         Console.WriteLine("Int({0}): {1}", num, Int(num))
         Console.WriteLine()
      Next
   End Sub
End Module

Fix(12.6): 12
Int(12.6): 12

Fix(12.1): 12
Int(12.1): 12

Fix(-12.1): -12
Int(-12.1): -13

Fix(-12.6): -12
Int(-12.6): -13