12,397,575 members (64,962 online)
Rate this:
Please Sign up or sign in to vote.
See more:
Can anyone give me a VB.net equivalent to the below Excel Formula:

number = 1.234567
=ROUND(number, 4-(INT(LOG(number)+1)))

This example returns 1.235 to 4 sig figs.
Posted 28-Jan-13 2:49am
Comments
Sergey Alexandrovich Kryukov 28-Jan-13 12:00pm

Why do you think you need rounding? It is almost never used. Maybe you need just the string presentation with less digits? This is a different story.
—SA

## 1 solution

Rate this:
Please Sign up or sign in to vote.

## Solution 1

```Math.Round(number, 4 - (CType(Math.Log10(number) + 1, Integer)))
```
Comments
Kschuler 28-Jan-13 14:41pm

Be careful with Math.Round. You may need to also specify a second parm to specify how to round when a number is half way to the next integral....See here: http://msdn.microsoft.com/en-us/library/as4h66hd(v=vs.90).aspx
Which states "By default, Math.Round uses MidpointRounding.ToEven. Most people are not familiar with "rounding to even" as the alternative, "rounding away from zero" is more commonly taught in school. .NET defaults to "Rounding to even" as it is statistically superior because it doesn't share the tendency of "rounding away from zero" to round up slightly more often than it rounds down (assuming the numbers being rounded tend to be positive.) "
CPallini 28-Jan-13 15:31pm

I know that.
Kschuler 28-Jan-13 15:32pm

:) I just meant it would be nice to warn the OP.
CPallini 28-Jan-13 15:48pm

I know that. :-)
Member 9451274 12-Feb-15 2:43am

This gave me a error in some combinations.

http://stackoverflow.com/questions/202302/rounding-to-an-arbitrary-number-of-significant-digits - and Pyrolistical answer

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Top Experts
Last 24hrsThis month
 OriginalGriff 290 Richard MacCutchan 225 Richard Deeming 214 Karthik Bangalore 190 F-ES Sitecore 100
 OriginalGriff 6,368 Karthik Bangalore 2,572 ppolymorphe 2,455 F-ES Sitecore 1,977 Richard MacCutchan 1,952

Advertise | Privacy | Mobile
Web02 | 2.8.160721.1 | Last Updated 28 Jan 2013
Copyright © CodeProject, 1999-2016
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100