Financial.NPer(Double, Double, Double, Double, DueDate) 方法

定義

命名空間:
Microsoft.VisualBasic
組件:
Microsoft.VisualBasic.Core.dll
組件:
Microsoft.VisualBasic.dll
來源:
Financial.vb
來源:
Financial.vb
來源:
Financial.vb
來源:
Financial.vb
來源:
Financial.vb

回傳一個基於定期固定支付和固定利率，指定年金期間數的價值。

public static double NPer(double Rate, double Pmt, double PV, double FV = 0, Microsoft.VisualBasic.DueDate Due = Microsoft.VisualBasic.DueDate.EndOfPeriod);
static member NPer : double * double * double * double * Microsoft.VisualBasic.DueDate -> double
Public Function NPer (Rate As Double, Pmt As Double, PV As Double, Optional FV As Double = 0, Optional Due As DueDate = Microsoft.VisualBasic.DueDate.EndOfPeriod) As Double

參數

Rate
Double

Required. 每個週期的利率。 例如，如果您的汽車貸款的年利率 (APR) 是10%，並且每月付款，則每期的利率為 0.1/12 或 0.0083。

Pmt
Double

Required. 每個期間都要支付的款項。 付款通常包含本金和利息，這些金額在年金期間不會改變。

PV
Double

Required. 即一系列未來付款或收款的現值，或今日價值。 例如，當你借錢買車時，貸款金額就是你每月汽車還款的現值。

FV
Double

Optional. 你在支付最後一筆款項後想要的未來價值或現金餘額。 例如，貸款的未來價值為 \$0，因為這是最終還款後的價值。 然而，如果你想在18年內為孩子存下50,000美元，那麼50,000美元就是未來的價值。 如果沒有指定，會假設為 0。

Due
DueDate

Optional. 指定付款到期時間的物件 DueDate 。 這個論點必須是 DueDate.EndOfPeriod 付款是在付款期間結束時到期，或 DueDate.BegOfPeriod 是付款在該期間開始時到期。 若省略， DueDate.EndOfPeriod 則視為假定。

傳回

Double

年金的週期數是基於定期固定付款和固定利率。

例外狀況

ArgumentException

Rate = 0 且 Pmt = 0

範例

此範例使用函 NPer 數回傳還還貸款時段數，該貸款價值包含於 PVal。 同時還提供) (APR / 12 期間利率、) 還款 (Payment 、貸款 (FVal) 未來價值，以及指示還款期限在還款期開始或結束) (PayType 的數字。

Sub TestNPer()
    Dim TotPmts As Double
    Dim PVal, APR, Payment As Double
    Dim PayType As DueDate
    Dim Response As MsgBoxResult

    ' Usually 0 for a loan.
    Dim Fval As Double = 0
    PVal = CDbl(InputBox("How much do you want to borrow?"))
    APR = CDbl(InputBox("What is the annual percentage rate of your loan?"))
    ' Usually 0 for a loan.
    If APR > 1 Then APR = APR / 100
    Payment = CDbl(InputBox("How much do you want to pay each month?"))
    Response = MsgBox("Do you make payments at the end of month?", MsgBoxStyle.YesNo)
    If Response = MsgBoxResult.No Then
        PayType = DueDate.BegOfPeriod
    Else
        PayType = DueDate.EndOfPeriod
    End If
    TotPmts = NPer(APR / 12, -Payment, PVal, FVal, PayType)
    If Int(TotPmts) <> TotPmts Then TotPmts = Int(TotPmts) + 1

    MsgBox("It will take you " & TotPmts & " months to pay off your loan.")
End Sub

備註

年金是指一段時間內，一系列的固定現金付款活動。 年金可能是一筆貸款 (例如房屋貸款) 或投資 (例如每月存款計劃)。

對於所有引數，付出的現金 (例如要儲蓄的存款金額) 是由負數表示；收入的現金 (例如股利支票) 是由正數表示。

適用於

另請參閱