“为了金钱,总是小数”?

时间:2010-04-08 22:56:19

标签: c# vb.net types finance financial

嗯,规则“ For money,always decimal ”不适用于Microsoft开发团队,因为如果是:

Namespace: Microsoft.VisualBasic
Assembly:  Microsoft.VisualBasic (in Microsoft.VisualBasic.dll)

Financial.IPmt所有其他方法都会接收/返回decimal而不是double

现在我想知道我是否可以使用这些方法而不用担心出现错误?

我应该使用其他一些图书馆来处理财务问题吗?如果是的话,你能指出一些好的(C#使用)吗?

3 个答案:

答案 0 :(得分:10)

以下是关于此主题的有趣讨论:http://www.vbforums.com/showthread.php?t=524101

约有1/3的人解释说它使用了Double,因为VB.NET函数的实现与VB6完全相同。 VB6没有十进制类型,这就是它使用double的原因。

因此,如果准确性很重要,那么就不应该使用这些功能。

this question的答案有一些很有前景的选择 - 只要忽略建议使用VB库的接受答案。

之前链接的问题已被删除,因此以下是我引用的一些建议(注意:我没有尝试过这些,YMMV)

答案 1 :(得分:10)

使用decimal获取资金的规则很有用,因为大多数货币都有十进制单位。通过使用十进制算术,可以避免引入和累积舍入误差。

Financial Class functions使用浮点数有几个原因:

  • 它们不会在内部累积 - 它们基于闭合形式的指数/对数计算,而不是基于周期的迭代和求和。
  • 他们倾向于不使用或产生精确的十进制值。例如,精确的十进制年利率除以12个月付款就会变成重复的小数。
  • 它们主要用于决策支持,最终几乎不适用于实际簿记。

Pmt并且舍入可以确定名义上的每月付款,但是一旦确定了该金额,余额累积 - 付款,应用的利息费用等 - 发生在decimal。此外,延迟或预付款,支付假期和其他此类不统一性将使财务职能部门提供的预计摊销无效。

答案 2 :(得分:4)

您可以使用此课程:

public class Financial
{
    #region Methods

    public static decimal IPmt(decimal Rate, decimal Per, decimal NPer, decimal PV, decimal FV, FinancialEnumDueDate Due)
    {
        decimal num;
        if (Due != FinancialEnumDueDate.EndOfPeriod)
        {
            num = 2;
        }
        else
        {
            num = 1;
        }
        if ((Per <= 0) || (Per >= (NPer + 1)))
        {
            //Argument_InvalidValue1=

            throw new ArgumentException("Argument 'Per' is not a valid value.");
        }
        if ((Due != FinancialEnumDueDate.EndOfPeriod) && (Per == 1))
        {
            return 0;
        }
        decimal pmt = Pmt(Rate, NPer, PV, FV, Due);
        if (Due != FinancialEnumDueDate.EndOfPeriod)
        {
            PV += pmt;
        }
        return (FV_Internal(Rate, Per - num, pmt, PV, FinancialEnumDueDate.EndOfPeriod) * Rate);
    }

    public static decimal PPmt(decimal Rate, decimal Per, decimal NPer, decimal PV, decimal FV, FinancialEnumDueDate Due)
    {
        if ((Per <= 0) || (Per >= (NPer + 1)))
        {
            throw new ArgumentException("Argument 'Per' is not valid.");
        }
        decimal num2 = Pmt(Rate, NPer, PV, FV, Due);
        decimal num = IPmt(Rate, Per, NPer, PV, FV, Due);
        return (num2 - num);
    }

    static decimal FV_Internal(decimal Rate, decimal NPer, decimal Pmt, decimal PV, FinancialEnumDueDate Due)
    {
        decimal num;
        if (Rate == 0)
        {
            return (-PV - (Pmt * NPer));
        }
        if (Due != FinancialEnumDueDate.EndOfPeriod)
        {
            num = 1 + Rate;
        }
        else
        {
            num = 1;
        }
        decimal x = 1 + Rate;
        decimal num2 = (decimal)Math.Pow((double)x, (double)NPer);
        return ((-PV * num2) - (((Pmt / Rate) * num) * (num2 - 1)));
    }

    static decimal Pmt(decimal Rate, decimal NPer, decimal PV, decimal FV, FinancialEnumDueDate Due)
    {
        decimal num;
        if (NPer == 0)
        {
            throw new ArgumentException("Argument NPer is not a valid value.");
        }
        if (Rate == 0)
        {
            return ((-FV - PV) / NPer);
        }
        if (Due != FinancialEnumDueDate.EndOfPeriod)
        {
            num = 1 + Rate;
        }
        else
        {
            num = 1;
        }
        decimal x = Rate + 1;
        decimal num2 = (decimal)Math.Pow((double)x, (double)NPer);
        return (((-FV - (PV * num2)) / (num * (num2 - 1))) * Rate);
    }

    #endregion Methods
}