Private Function FN_Calcuate(n As Integer) As Decimal FN_Calcuate = 0 FN_Calcuate = n / (n + 1) * (n + 2) Return FN_Calcuate End Function
