Hallo!

Es gibt Math.Round() oder auch Decimal.Round(). Diese Funktionen runden auf
Dezimalstellen.

> ich sollte eine Formel haben in der Dezimalstunden auf die jeweiligen 
> Viertelstunden gerundet werden k�nnen. Z. Bsp: 1,34 = 1,25 
> Dezimalstunden, 
> oder 1,38 sind 1,5 Dezimalstunden. 

Um jetzt auf Bruchteile zu runden, multiplizierst Du den Ausgangswert mit
dem Kehrwert des Bruches, rundest ihn, und multiplizierst ihn mit dem Bruch:

Rundung auf 0,25

r = 0.25d
x = 1.34d
y = (x / r).Round(0) * r

> Zudem ben�tige ich noch eine Formel bei der kfm auf- bzw. abgerundet 
> werden soll auf eine Stelle nach dem Komma. Z. Bsp: 1,24 sind 
> dann 1,0 und 
> 1,25 w�ren dann 1,5. Die Ergebnisse sollten 0,5; 1,0; 1,5; 
> 2,0; 2,5 usw. 
> sein.

Rundung auf 0,5

r = 0.5d
x = 1.24d
y = (x / r).Round(0) * r

Eine allgemeine Funktion w�re dann z. B.

Function Runden(ByVal Wert As Double, Basis As Double) As Double
   Return (Wert / Basis).Round(0) * Basis
End Function

Teste die Funktion im Hinblick auf kaufm�nnische Rundung bitte selber.

Freundliche Gr��e
Joachim van de Bruck

_______________________________________________
Vb.net mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/vb.net

Odpovedet emailem