# Financial.MIRR(Double[], Double, Double) 方法

## 定义

``````public:
static double MIRR(cli::array <double> ^ % ValueArray, double FinanceRate, double ReinvestRate);``````
``public static double MIRR (ref double[] ValueArray, double FinanceRate, double ReinvestRate);``
``static member MIRR : Double[] * double * double -> double``
``Public Function MIRR (ByRef ValueArray As Double(), FinanceRate As Double, ReinvestRate As Double) As Double``

ValueArray
Double[]

FinanceRate
Double

ReinvestRate
Double

Double

#### 例外

`ValueArray` 的秩不等于 1，`FinanceRate` = -1，或 `ReinvestRate` = -1

## 示例

``````' Define money format.
Dim MoneyFmt As String = "###,##0.00"
' Define percentage format.
Dim PercentFmt As String = "#0.00"

Dim values(4) As Double
values(0) = -70000
' Positive cash flows reflecting income for four successive years.
values(1) = 22000
values(2) = 25000
values(3) = 28000
values(4) = 31000

' Use the MIRR function to calculate the internal return rate.
' Set the loan rate.
Dim LoanAPR As Double = 0.1
' Set the reinvestment rate.
Dim InvAPR As Double = 0.12
' Calculate internal rate.
Dim RetRate As Double = MIRR(values, LoanAPR, InvAPR)
' Display internal return rate.
MsgBox("The modified internal rate of return for these cash flows is " &
Format(Math.Abs(RetRate) * 100, CStr(PercentFmt)) & "%.")
``````

## 注解

`MIRR` 函数使用数组中的值顺序来解释付款和收据的顺序。 请务必按正确的顺序输入付款和收据值。