Comcast web hosting - Try Dim dblRate, dblPV, dblPmt As Double Dim
Try Dim dblRate, dblPV, dblPmt As Double Dim lngNPer As Long dblPV = InputBox(”Enter the Credit Card balance: “) dblPmt = InputBox(”Enter the monthly payment: “) dblRate = InputBox(”Enter the monthly interest rate (.xxxx): “) lngNPer = NPer(dblRate, -dblPmt, dblPV, 0, 1) MsgBox(”Your credit card balance will be paid in ” & _ lngNPer & ” months.” & vbCrLf & “That’s ” & _ Int(lngNPer / 12) & ” years and ” & _ Math.Round(lngNPer Mod 12, 2) & ” months.”) Catch e As System.Exception MsgBox(”Unable to compute period because of error ” & e.Message) End Try End Sub Programming Tips and Gotchas Both rate and pmt must be expressed in the same time unit. That is, if pmt reflects the monthly payment amount, rate must be the monthly interest rate. NPer is useful in calculating the number of payment periods required to repay a loan when the monthly loan payment is fixed or when an approximate amount of a monthly payment is known. In this case, pv reflects the amount of the loan, and fv is usually 0, reflecting the fact that the loan is to be entirely repaid. NPer is useful in determining the length of time required to meet some future financial goal. In this case, pv represents the current level of savings, and fv represents the desired level of savings. See Also FV Function, IPmt Function, NPV Function, Pmt Function, PPmt Function, PV Function, Rate Function NPV Function Class Microsoft.VisualBasic.Financial Syntax NPV(rate, valuearray( ) ) rate Use: Required
Hint: This post is supported by Gama web hosting php mysql provider