I have a function:
Public Function fnCalcIncome(nYear As Integer, ClientMonthlyInc As Currency, InflationFactor As Double, xTaxchk As Double, yTaxRate As Double) As Currency
Dim I As Integer
Dim IncludeInfl As Integer
For I = 1 To nYear
If I = 1 Then
StartIncomeAmt =...