User Tools

Site Tools


vba:cast:roundcurr

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
vba:cast:roundcurr [24.08.2016 09:31:59]
yaslaw
vba:cast:roundcurr [31.05.2017 11:32:34] (current)
yaslaw [Enum rcRoundType]
Line 27: Line 27:
 ' */ ' */
 Public Enum rcRoundType Public Enum rcRoundType
-    rcRound ​    '​Normal runden ​                         roundCurr(3.6,​ 0.5) = 3.5 +    rcRound ​    '​Normal runden ​                         roundCurr(3.6,​ 0.5) = 3.5 
-    rcHalfDown ​ 'Alias zu normal. 0.5 wird abgerundet ​  ​roundCurr(3.25,​ 0.5, rcHalfDown) = 3 +    rcHalfDown ​ 'Alias zu normal. 0.5 wird abgerundet ​  ​roundCurr(3.25,​ 0.5, rcHalfDown) = 3 
-    rcHalfUp ​   'Ab der Hälfte aufrunden ​               roundCurr(3.25,​ 0.5, rcHalfUp) = 3.5 +    rcHalfUp ​   'Ab der Hälfte aufrunden ​               roundCurr(3.25,​ 0.5, rcHalfUp) = 3.5 
-    rcDowwn ​    '​immer abrunden ​                        ​roundCurr(3.4,​ 0.5, rcDowwn) = 3 +    rcDowwn ​    '​immer abrunden ​                        ​roundCurr(3.4,​ 0.5, rcDowwn) = 3 
-    rcUp        'immer aufrunden ​                       roundCurr(3.1,​ 0.5, rcUp) = 3.5+    rcUp        'immer aufrunden ​                       roundCurr(3.1,​ 0.5, rcUp) = 3.5
 End Enum</​code>​ End Enum</​code>​
  
Line 58: Line 58:
 <​Double>​ 100 <​Double>​ 100
 </​code>​ </​code>​
 +
 +Auf/​Abrunden
 +<code vb>'​Normal runden ​                         ​
 +d roundCurr(3.6,​ 0.5) 
 +<​Double>​ 3.5
 +
 +'Alias zu normal. 0.5 wird abgerundet ​  
 +d roundCurr(3.25,​ 0.5, rcHalfDown) ​
 +<​Double>​ 3
 +
 +'Ab der Hälfte aufrunden ​               ​
 +d roundCurr(3.25,​ 0.5, rcHalfUp) ​
 +<​Double>​ 3.5
 +
 +'immer abrunden ​                        
 +d roundCurr(3.4,​ 0.5, rcDowwn) ​
 +<​Double>​ 3
 +
 +'immer aufrunden ​                       ​
 +d roundCurr(3.1,​ 0.5, rcUp) 
 +<​Double>​ 3.5</​code>​
  
 ===== Code ===== ===== Code =====
 +Code zum importieren. Wenn er mit C&P in ein neus Modul eingefügt wird, dann muss die Zeile ''​Attribute VB_Name = "​cast_roundCurr"''​ entfernt werden.
 +
 <source '​%%fpath%%/​%%fname%%'​ vb> <source '​%%fpath%%/​%%fname%%'​ vb>
  
  
vba/cast/roundcurr.1472023919.txt.gz · Last modified: 24.08.2016 09:31:59 by yaslaw