Financial.Pmt(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 Pmt(double Rate, double NPer, double PV, double FV = 0, Microsoft.VisualBasic.DueDate Due = Microsoft.VisualBasic.DueDate.EndOfPeriod);
static member Pmt : double * double * double * double * Microsoft.VisualBasic.DueDate -> double
Public Function Pmt (Rate As Double, NPer As Double, PV As Double, Optional FV As Double = 0, Optional Due As DueDate = Microsoft.VisualBasic.DueDate.EndOfPeriod) As Double

パラメーター

Rate
Double

必須。 期間あたりの利率。 たとえば、10 パーセントの年間利率 (APR) で自動車ローンを契約し、月払いで返済を行う場合、1 か月の利率は 0.1/12 (0.0083) になります。

NPer
Double

必須。 年金の支払期間の合計数。 たとえば、4 年間の自動車ローンで月払いを行う場合、ローンの支払い期間は合計 4 × 12 (または 48) になります。

PV
Double

必須。 将来一連の支払いを行う現在価値 (または一括合計) は、現在価値があります。 たとえば、車の購入資金を借りた場合、ローン金額は、借り手が毎月行う返済の貸し手に対する現在価値です。

FV
Double

このフィールドは省略可能です。 最終的な支払いを行った後に必要な将来価値または現金残高。 たとえば、ローンの将来価値は \$0 です。これは、最終的な支払い後の値であるためです。 ただし、お子様の教育のために 18 年間に \$50,000 を節約する場合は、\$50,000 が将来の価値になります。 省略した場合、0 が想定されます。

Due
DueDate

このフィールドは省略可能です。 支払い期限を指定する DueDate 型のオブジェクト。 この引数は、支払い期間の終了時に支払いが行われる場合は DueDate.EndOfPeriod 、支払い期限が期間の初めに支払われる場合は DueDate.BegOfPeriod する必要があります。 省略すると、 DueDate.EndOfPeriod が想定されます。

返品

Double

定期的な固定支払いと固定利率に基づく年金の支払い。

例外

ArgumentException

NPer = 0。

例

次の使用例は、 Pmt 関数を使用して、一定期間のローンの毎月の支払いを返します。 期間あたりの利率 (APR / 12)、支払総数 (TotPmts)、ローンの現在価値または元金 (PVal)、ローンの将来価値 (FVal)、支払期日の開始時または終了時を示す数値を指定します。 (PayType).

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

    ' Define money format.
    Dim Fmt As String = "###,###,##0.00"
    ' 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?"))
    If APR > 1 Then APR = APR / 100 ' Ensure proper form.
    TotPmts = CDbl(InputBox("How many monthly payments will you make?"))
    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
    Payment = Pmt(APR / 12, TotPmts, -PVal, FVal, PayType)

    MsgBox("Your payment will be " & Format(Payment, Fmt) & " per month.")
End Sub

注釈

年金とは、一定期間に行われる一連の固定現金支払いのことです。 投資としては、ローン (住宅ローンなど) または本来の投資 (毎月の貯蓄プランなど) が該当します。

Rate引数とNPer引数は、同じ単位で表される支払期間を使用して計算する必要があります。 たとえば、 Rate が月を使用して計算される場合、 NPer も月を使用して計算する必要があります。

すべての引数について、支払われた現金(預金から預金など)は負の数で表されます。受け取った現金 (配当チェックなど) は正の数値で表されます。

適用対象

こちらもご覧ください