Financial.Rate(Double, Double, Double, Double, DueDate, Double) Metode

Definisi

Ruang nama:
Microsoft.VisualBasic
Rakitan:
Microsoft.VisualBasic.Core.dll
Rakitan:
Microsoft.VisualBasic.dll
Sumber:
Financial.vb
Sumber:
Financial.vb
Sumber:
Financial.vb
Sumber:
Financial.vb
Sumber:
Financial.vb

Mengembalikan nilai yang menentukan suku bunga per periode untuk anuitas.

public static double Rate(double NPer, double Pmt, double PV, double FV = 0, Microsoft.VisualBasic.DueDate Due = Microsoft.VisualBasic.DueDate.EndOfPeriod, double Guess = 0.1);
static member Rate : double * double * double * double * Microsoft.VisualBasic.DueDate * double -> double
Public Function Rate (NPer As Double, Pmt As Double, PV As Double, Optional FV As Double = 0, Optional Due As DueDate = Microsoft.VisualBasic.DueDate.EndOfPeriod, Optional Guess As Double = 0.1) As Double

Parameter

NPer
Double

Required. Jumlah total periode pembayaran dalam anuitas. Misalnya, jika Anda melakukan pembayaran bulanan pada kredit mobil selama empat tahun, pinjaman Anda mempunyai total dari 4 * 12 (atau 48) periode pembayaran.

Pmt
Double

Required. Pembayaran yang akan dilakukan setiap periode. Pembayaran biasanya mengandung pokok dan bunga yang tidak berubah selama anuitas.

PV
Double

Required. Nilai saat ini, atau nilai saat ini, dari serangkaian pembayaran atau tanda terima di masa mendatang. Misalnya, ketika Anda meminjam uang untuk membeli mobil, jumlah pinjaman adalah nilai saat ini kepada pemberi pinjaman pembayaran mobil bulanan yang akan Anda lakukan.

FV
Double

Optional. Nilai masa depan atau saldo tunai yang Anda inginkan setelah melakukan pembayaran akhir. Misalnya, nilai pinjaman di masa mendatang adalah \$0 karena itu adalah nilainya setelah pembayaran akhir. Namun, jika Anda ingin menghemat \$50.000 selama 18 tahun untuk pendidikan anak Anda, maka \$50.000 adalah nilai masa depan. Jika dihilangkan, asumsinya 0.

Due
DueDate

Optional. Objek jenis DueDate yang menentukan kapan pembayaran jatuh tempo. Argumen ini harus berupa DueDate.EndOfPeriod jika pembayaran jatuh tempo pada akhir periode pembayaran, atau DueDate.BegOfPeriod jika pembayaran jatuh tempo pada awal periode. Jika dihilangkan, DueDate.EndOfPeriod diasumsikan.

Guess
Double

Optional. Nilai yang Anda perkirakan dikembalikan oleh Rate. Jika dihilangkan, Guess adalah 0,1 (10 persen).

Mengembalikan

Double

Suku bunga per periode untuk anuitas.

Pengecualian

ArgumentException

NPer <= 0.

Contoh

Contoh ini menggunakan Rate fungsi untuk menghitung suku bunga pinjaman dengan jumlah total pembayaran (TotPmts), jumlah pembayaran pinjaman (Payment), nilai saat ini atau pokok pinjaman (PVal), nilai pinjaman di masa mendatang (FVal), angka yang menunjukkan apakah pembayaran jatuh tempo pada awal atau akhir periode pembayaran (PayType), dan perkiraan suku bunga yang diharapkan (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

Keterangan

Anuitas adalah serangkaian pembayaran kas tetap yang dilakukan selama suatu periode waktu.. Anuitas bisa berupa pinjaman (seperti hipotek rumah) atau investasi (seperti rencana tabungan bulanan).

Untuk semua argumen, kas yang Anda bayarkan (seperti deposit hingga tabungan) dinyatakan dengan angka negatif; kas yang diterima (seperti cek dividen) dinyatakan dengan angka positif.

Rate dihitung dengan iterasi. Dimulai dengan nilai Guess, Rate berputar melalui perhitungan hingga hasilnya akurat hingga dalam 0,00001 persen. Jika Rate tidak dapat menemukan hasil setelah 20 percobaan, hasilnya gagal. Jika tebakan Anda 10 persen dan Rate gagal, coba nilai yang berbeda untuk Guess.

Berlaku untuk

Lihat juga