Função NPer
Retorna um Double especificando o número de períodos para uma anuidade baseada em pagamentos periódicos fixos e taxa fixa de juros.
Function NPer( _
ByVal Rate As Double, _
ByVal Pmt As Double, _
ByVal PV As Double, _
Optional ByVal FV As Double = 0, _
Optional ByVal Due As DueDate = DueDate.EndOfPeriod _
) As Double
Parâmetros
Rate
Obrigatório.Double especificando a taxa de juros por período. Por exemplo, se você obtiver um empréstimo de carro com uma taxa percentual anual (APR) de 10 % e fizer pagamentos mensais, a taxa por período é 0,1 / 12, ou 0,0083.Pmt
Obrigatório.Double a especificação de pagamento a ser feito em cada período. Pagamentos geralmente contêm principal e os juros que não é alterado durante a vigência da anuidade.PV
Obrigatório.Double especificando presente de valor ou valor hoje em dia, de uma série de futuros pagamentos ou recebimentos. Por exemplo, quando você pedir dinheiro emprestado para comprar um carro, valor do empréstimo é o valor atual para o credor dos pagamentos mensais do carro que você fará.FV
Opcional.Double especificando o valor futuro ou o Equilíbrio em dinheiro desejado após você ter feito o pagamento final. Por exemplo, o valor futuro de um empréstimo é $0, porque esse será o valor depois do pagamento.Entretanto, se você quiser economizar $50,000 durante 18 anos para a educação de seu filho, então $50,000 é o valor futuro.Se omitido, 0 será adotado.Due
Opcional.Objeto do tipo Enumeração DueDate que especifica quando os pagamentos devem ser feitos.Esse argumento deve ser DueDate.EndOfPeriod se os pagamentos devem ser feitos ao final do período de pagamento, ou DueDate.BegOfPeriod se os pagamentos devem ser feitos no início do período.Se omitido, DueDate.EndOfPeriod será adotado.
Exceções
Tipo de exceção |
Número de erro |
Condição |
---|---|---|
Rate <= -1. |
||
Rate = 0 e Pmt = 0 |
Ver a coluna " número de erro " se você estiver atualizando aplicativos Visual Basic 6.0 que usam manipulação de erros não estruturada.(Você pode comparar o número do erro com a Propriedade do Número (Erro de objeto).) Entretanto, quando for possivel, você pode considerar substituir tal controle de erro por Visão Geral sobre a Manipulação Estruturada de Exceções para o Visual Basic.
Comentários
Uma anuidade é uma série de pagamentos fixos em dinheiro feitos em um período de tempo.Uma anuidade pode ser um empréstimo (como uma hipoteca doméstica) ou um investimento (como um plano de economias mensais).
Para todos os argumentos, dinheiro pago (como depósito em poupança) é representado por números negativos e dinheiro recebido (como cheques de dividendos) é representado por números positivos.
Exemplo
Este exemplo usa a função NPer para retornar o número de períodos durante os quais pagamentos devem ser feitos para liquidar um empréstimo cujo valor está contido em PVal.Também são fornecidas a taxa percentual de juros por período (APR / 12), o pagamento (Payment), o valor futuro do empréstimo (FVal)e um número que indica se o pagamento vence no início ou final do período de pagamento (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
Requisitos
Namespace:Microsoft.VisualBasic
**Módulo:**Financial
Assembly: Visual Basic Runtime Library (em Microsoft.VisualBasic.dll)