foo=4167
bar = CInt(left(foo,Len(foo)-2)&"99")
msgbox(bar)
Frågan#1
Hur avrundar jag snyggt ett tal till närmaste 99-tal, uppåt?
Alltså, 4167 vill jag ha till 4199. 3561 till 3599 osv.
Tack på förhand.
Hur avrundar man ett tal snyggt?
4 svar · 540 visningar · startad av l-boy
Det är ingen bra ide att försöka sig på att använda msgbox() i asp. ;)
Förlåt, skrev det hela som ett lokalt VBS.. :) ;)
Här har du det i en funktion.
foo=30821
bar = Round99(foo)
Response.Write(bar)
Function Round99(nTal)
If IsNumeric(nTal) Then
nTmp=CInt(left(nTal,Len(nTal)-2)&"99")
Else
nTmp=nTal
End If
Round99=nTmp
End Function
Inte heller så bra idé att hantera nummer som strängar för att göra avrundningar.
Lite vettigare:
bar = Fix(foo / 100) * 100 + 99