Sprache: VB
Diese Funktion ermittelt den Nettopreis von einem Bruttopreis. Und wer glaubt man könnte z.B. einfach 16% von 100€ abziehen und hätte somit den Nettopreis der liegt leider falsch 😉
''' <summary>
''' Diese Funktion ermittelt den Nettopreis von einem Bruttopreis
''' </summary>
''' <param name="GrossPrice">Den Bruttopreis</param>
''' <param name="Tax">Die Steuern für den Bruttopreis</param>
Public Function GetNetPrice(ByVal GrossPrice As Decimal, ByVal Tax As Single) As Decimal
Return (GrossPrice / (GrossPrice + Tax)) * GrossPrice
End Function
''' <summary>
''' Diese Funktion ermittelt den Nettopreis von einem Bruttopreis
''' </summary>
''' <param name="GrossPrice">Den Bruttopreis</param>
''' <param name="Tax">Die Steuern für den Bruttopreis</param>
Public Function GetNetPrice(ByVal GrossPrice As Decimal, ByVal Tax As Single) As Decimal
Return (GrossPrice / (GrossPrice + Tax)) * GrossPrice
End Function
Alte URL:
/snippet/nettopreis-ermitteln/239
Da hat wohl jemand Brutto und Netto-Preis verwechselt 😉
Tatsächlich, habs verbessert. Danke!