APR calculator in .NET

Question

Where can I find a good APR calculator function for UK business..

Answer 1

private double GetAPR()
{

    int i = 0;
    for (;;)
    {

        apr = (rate*((Math.Pow((1 + rate), duration))) /
              ((Math.Pow((1 + rate), duration)) - 1)) - 
              (installment/(loanamount - extracost));
        if (apr >= 0)
        {
            lblapr.Text = apr.ToString() + " + " + i.ToString();
            break;
        }
        else
        {
            i++;
            rate = rate*1200;
            rate = Math.Round(rate, 3);
            rate = rate + 0.01;
            rate = rate/1200;
        }
    }

    return rate;
}