Compartir a través de


Módulo Financial (Visual Basic)

Actualización: noviembre 2007

El módulo Financial contiene procedimientos empleados para realizar operaciones financieras.

Comentarios

Este módulo admite los miembros de biblioteca en tiempo de ejecución de Visual Basic que realizan cálculos financieros como depreciación, valores presentes y futuros, tipos de interés, tasas de devolución y pagos.

Miembros

DDB

FV

IPmt

IRR

MIRR

NPer

NPV

Pmt

PPmt

PV

Rate

SLN

SYD

 

 

 

Ejemplo

En este ejemplo, se utiliza la función Rate para calcular el tipo de interés de un préstamo, dados el número total de pagos (TotPmts), la cantidad del pago del préstamo (Payment), el valor actual o principal del préstamo (PVal), el valor futuro del préstamo (FVal), un número que indica si el pago vence al principio o al final del período de pago (PayType) y una aproximación del tipo de interés previsto (Guess).

Sub TestRate()
    Dim PVal, Payment, TotPmts, APR As Double
    Dim PayType As DueDate

    ' Define percentage format.
    Dim Fmt As String = "##0.00"
    Dim Response As MsgBoxResult
    ' Usually 0 for a loan.
    Dim FVal As Double = 0
    ' Guess of 10 percent.
    Dim Guess As Double = 0.1
    PVal = CDbl(InputBox("How much did you borrow?"))
    Payment = CDbl(InputBox("What's your monthly payment?"))
    TotPmts = CDbl(InputBox("How many monthly payments do you have to make?"))
    Response = MsgBox("Do you make payments at the end of the month?", MsgBoxStyle.YesNo)
    If Response = MsgBoxResult.No Then
        PayType = DueDate.BegOfPeriod
    Else
        PayType = DueDate.EndOfPeriod
    End If
    APR = (Rate(TotPmts, -Payment, PVal, FVal, PayType, Guess) * 12) * 100

    MsgBox("Your interest rate is " & Format(CInt(APR), Fmt) & " percent.")
End Sub

Vea también

Referencia

Resumen financiero

Palabras clave y miembros por tareas

Palabras clave del lenguaje Visual Basic

Miembros de la biblioteca en tiempo de ejecución de Visual Basic

Palabras clave comparadas en diferentes lenguajes