Formatting a single to two decimal places

Question

I need help in trying to format a single to only 2 decimal places Dim d as single Dim i as integer Dim p as integer i = 2000 p = 34567 d = (i / p ) label1.text = d Now the answer is 0.057858651314837851129690166922209, but I only want to show .06 so I also need to round up the second decimal place as well. I cannot seem to find good documentation on this, and I know that this seems like a total newbie question, but I am so lost it is not even funny =)

Adam Erstelle · Answer

you could also use the String.format() function it would be quite a bit cleaner code but would accomplish the same task as posted above.

joy.simpson · Answer

Here is some code added to your own code used in a Console application. Change the place from 2 to another number to round to that number of places after the decimal. Sub Main() Dim n s As Double Dim d As Single Dim i As Integer Dim p As Integer i = 2000 p = 34567 d = (i / p) n = d * (10 ^ 2) n = Math.Sign(n) * (Math.Abs(Math.Floor(n + 0.5))) ' n = Math.Sign(n) * (Math.Abs(Int(n + 0.5))) 'alternative code s = n / (10 ^ 2) Console.WriteLine(s) End Sub