asked on

Remove extra zeros

Hi

How do I remove "extra" zeros from end of string
e.g. replace 2.3100 with 2.31 and 4.4400000 with 4.44
(I don't simply want to round the number, rather remove extra 0's)

Thanks

jerrypd

i would start at the end of the string lopping off a character at a time until i got to a non-zero character.
There are probably better ways, but this would work.

plusone3055

TRIM
http://msdn.microsoft.com/en-us/library/kxbw3kwc.aspx

Luis Pérez

Dim s As String = "4.4400000"
s = s.TrimEnd("0") 'Now trailing zeros are removed, string contains "4.44"

Hope that helps.

rwallacej

ASKER

thanks,

this is ok sometimes but when the value is e.g. 40 it is changed to "4", or 1000 it is changed to "1"

I don't want the number to change just remove extra decimal "0"

plusone3055

again first one to suggest

TRIM
http://msdn.microsoft.com/en-us/library/kxbw3kwc.aspx

rwallacej

ASKER

example please? I can't see how the trim will remove extra zeros only after decimal points

SOLUTION

PaulHews

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

x77

try this function - NormalizeDouble.

Function NormalizeDouble(ByVal s As String) As String
    Dim v As Double
    If Double.TryParse(s, v) Then s = v.ToString("g")
    Return s
End Function

Open in new window