PV 函式
更新：2007 年 11 月
傳回 Double，指定以定期、未來固定應付款及固定利率為基礎的年金現值。
Function PV( _
ByVal Rate As Double, _
ByVal NPer As Double, _
ByVal Pmt As Double, _
Optional ByVal FV 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 會指定每一期的應付款。付款通常包含在年金期限內不會變更的本金和利息。FV
選擇項。Double 會指定在最後一次付款之後您想要的未來值或現金餘額。例如，貸款的未來值為 $0，因為是代表最後一期付款之後的值。不過，如果您想要在 18 年期間存 50,000 美元做為子女教育費用，那麼 50,000 美元就是這個未來值。如果省略，則假設為 0。Due
選擇項。DueDate 列舉型別 型別的物件，指定付款何時到期。這個引數必須是 DueDate.EndOfPeriod (若付款期限是付款期間的結束日)，或 DueDate.BegOfPeriod (若付款期限是付款期間的開始日)。如果省略，則假設為 DueDate.EndOfPeriod。
備註
年金是在約定期間內一連串的固定現金付款。年金可以是借貸 (例如房屋抵押貸款) 也可以是投資 (例如每月定存存單)。
Rate 和 NPer 引數必須使用以相同單位表示的付款週期計算。例如，如果 Rate 是以月計算，則 NPer 也必須以月來計算。
凡是引數，現金支出 (例如存款) 都以負數來表示，現金收入 (例如股息支票) 則以正數來表示。
範例
在這個範例中，PV 函式會傳回 $1,000,000 年金的現值，這筆年金將會在未來 20 年中每年提供 $50,000。前提是提供預期的年利率 (APR)、付款總數 (TotPmts)、每筆付款的金額 (YrIncome)、投資的未來總值 (FVal) 和表示每一筆付款時間是在付款期間開頭或結尾的數字 (PayType)。請注意，由於 YrIncome 代表每年年金的現金支出，因此是負數。
Sub TestPV()
' Define money format.
Dim Fmt As String = "###,##0.00"
' Annual percentage rate.
Dim APR As Double = 0.0825
' Total number of payments.
Dim TotPmts As Double = 20
' Yearly income.
Dim YrIncome As Double = 50000
' Future value.
Dim FVal As Double = 1000000
' Payment at beginning of month.
Dim PayType As DueDate = DueDate.BegOfPeriod
Dim PVal As Double = PV(APR, TotPmts, -YrIncome, FVal, PayType)
MsgBox("The present value is " & Format(PVal, Fmt) & ".")
End Sub
需求
命名空間 (Namespace)︰Microsoft.VisualBasic
**模組︰**Financial
組件 (Assembly)：Visual Basic Runtime Library (在 Microsoft.VisualBasic.dll 中)