[ riki_lj @ 19.02.2006. 17:43 ] @
Molim vas da mi pomognete sta treba da uradim da bi se odredjeni rezultat npr. 18.57 zaokruzivao na 18.55 itd. Unaprijed hvala. |
[ riki_lj @ 19.02.2006. 17:43 ] @
[ nidisa @ 20.02.2006. 11:00 ] @
evo 2 primjera:
1: Round(1.456, 2) 'ovo vraca vrijednost 1.46. Broj 2 je broj decimala 2: drugi primjer je modul koji mozes kopirati u svoju bazu i pozvati sa roundcurr Public Function RoundCurr(OriginalValue As Currency, Optional NumberOfDecimals As Integer) As Currency On Error GoTo Error_Handler 'returns a currency value rounded to the specified number of decimals of the Original Value If IsMissing(NumberOfDecimals) Then NumberOfDecimals = 0 End If RoundCurr = Int((OriginalValue * (10 ^ NumberOfDecimals)) + 0.5) _ / (10 ^ NumberOfDecimals) Exit_Procedure: Exit Function Error_Handler: MsgBox Err.Number & ", " & Err.Description Resume Exit_Procedure End Function [ Zidar @ 20.02.2006. 13:51 ] @
Savet koji ti je dao Nidisa radi za zaokruzivanje na odredjeni broj decimala. U Bazi znanja imas dve funkcije koje zaokruzuju na bilo koji inkrement (na 0.25. na 0.5, na gore, na dole i slicno). Potrazi tamo.
Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.
|