Fjern decimaler i en streng
Hej.Kan nogen hjælpe mig med at lave en funktion som sletter evt. nul-decimaler.
Altså
7,2500 -> 7,25
7,0000 -> 7
7,9990 -> 7,999
Det er vist ret simpelt.
Function FjernNuller(ByVal Tekst)
Tekst = ???
FjernNuller = trim(Tekst)
end Function
