Dim z As Single = 2.75 Dim z1 As Single = Math.Truncate(z) Dim z2 As Single = z - z1
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)