通过

FV 函数

  • 项目

更新：2007 年 11 月

返回一个 Double 数据类型值，指定按定期定额支付且利率固定的年金的未来值。

Function FV( _
   ByVal Rate As Double, _
   ByVal NPer As Double, _
   ByVal Pmt As Double, _
   Optional ByVal PV As Double = 0, _
   Optional ByVal Due As DueDate = DueDate.EndOfPeriod _
) As Double

参数

  • Rate
    必选。Double 数据类型，指定各期利率。例如，如果您获得的汽车贷款的年利率 (APR) 为 10% 并实行按月偿付，则每期利率为 0.1/12，即 0.0083。

  • NPer
    必选。Double 数据类型，指定一笔年金的付款总期数。例如，如果您的汽车贷款期为四年并实行按月偿付，则您总共分 4 x 12（即 48）期偿付贷款。

  • Pmt
    必选。Double 数据类型，指定每期要支付的帐款。付款通常包含在年金有效期内不会更改的本金和利息。

  • PV
    可选。Double 数据类型，指定多次未来付款的现值（一次付清的款额）。例如，当您贷款买汽车时，对贷方而言，贷款金额就是您按月付款总额的现值。如果省略，则假定为 0。

  • Due
    可选。DueDate 枚举类型对象，指定付款截止日期。该参数必须是 DueDate.EndOfPeriod（如果付款截止日期是在付款期末尾），或 DueDate.BegOfPeriod（如果付款截止日期是在付款期开始）。如果省略，则假定为 DueDate.EndOfPeriod。

备注

年金是一系列持续支付的固定数量现金。年金可以是一笔贷款（如住房抵押）或一笔投资（如按月储蓄计划）。

Rate 和 NPer 参数必须使用以相同单位表示的付款周期计算。例如，如果 Rate 按月计算，则 NPer 也必须按月计算。

对于所有参数，支付的现金（如存款）用负数表示；收到的现金（如股息支票）用正数表示。

示例

本示例使用 FV 函数返回投资的未来值，假设前提包括：每期累积利率 (APR / 12)，付款总期数 (TotPmts)，付款额 (Payment)，当前投资额 (PVal)，以及一个用于指示付款日期是在付款周期的开始还是末尾的数字 (PayType)。注意，由于 Payment 表示现金支出，所以它是负数。

Sub TestFV()
    Dim TotPmts As Integer
    Dim Payment, APR, PVal, Fval As Double
    Dim PayType As DueDate
    Dim Response As MsgBoxResult

    ' Define money format.
    Dim Fmt As String = "###,###,##0.00"
    Payment = CDbl(InputBox("How much do you plan to save each month?"))
    APR = CDbl(InputBox("Enter the expected interest annual percentage rate."))
    ' Ensure proper form.
    If APR > 1 Then APR = APR / 100
    TotPmts = CInt(InputBox("For how many months do you expect to save?"))
    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
    PVal = CDbl(InputBox("How much is in this savings account now?"))
    Fval = FV(APR / 12, TotPmts, -Payment, -PVal, PayType)
    MsgBox("Your savings will be worth " & Format(Fval, Fmt) & ".")
End Sub

要求

命名空间：Microsoft.VisualBasic

**模块：**Financial

**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）

请参见

参考

财务摘要