| |
Функция Pmt | | Синтаксис Pmt(rate, nper, pv[, fv[, type]]) | Возвращает значение типа Double, указывающее объем регулярных платежей по займу при фиксированной учетной ставке. | Параметры Наименование | Описание | Rate | Обязательный. Выражение типа Double, указывающее учетную ставку за период. Например, при выплате займа на приобретение автомобиля из расчета 10 процентов годовых, ежемесячная ставка составит 0 1/12, т.е. 0,0083.
| NPer | Обязательный. Выражение типа Integer, указывающее полное число периодов (выплат) за рассматриваемый срок. Например, если заем на приобретение автомобиля взят на четыре года, число месячных периодов (количество выплат) составит 4 * 12 (48).
| PV | Обязательный. Выражение типа Double, указывающее величину суммы на текущий момент. Например, при займе на покупку автомобиля, сумма займа является текущим значением при расчете будущих платежей.
| FV | Необязательный. Выражение типа Variant, указывающее результат, который должен быть достигнут по завершении выплат. Для займа это, очевидно, нулевое значение (заем должен быть погашен). Если же вы копите деньги на обучение ребенка, а всего накопить следует 50 000 долларов за 18 лет, то результатом является сумма в 50000 долларов. Если этот аргумент опущен, подразумевается значение 0.
| Type | Необязательный. Выражение типа Variant, указывающее режим выплат. Значение 0 означает, что платежи вносятся в конце каждого периода, а значение 1, что они вносятся в начале каждого периода. Если этот аргумент опущен, подразумевается значение 0. |
| Замечания | Пример использования 'в данном примере функция Pmt используется для расчета величины ежемесячных
'выплат по займу за определенный период, в качестве входных значений при расчете
'используется процентная ставка (APR / 12), полное число выплат (TotPmts), текущий объем
'займа (PVal), необходимый результат (FVal), а также число, задающее режим выплат
(PayType)
Dim Fmt, FVal, PVal, APR, TotPmts, PayType, Payment
Const ENDPERIOD = 0, BEGINPERIOD = 1 'режим выплат
Fmt = "###,###,##0.00" 'денежный формат
FVal = 0 'для займа обычно 0
PVal = InputBox("Каков объем займа?")
APR = InputBox("Какова годовая учетная ставка?")
If APR > 1 Then APR = APR / 100 'правильная форма
TotPmts = InputBox("Каково число ежемесячных выплат?")
PayType = MsgBox("Выплаты производятся в конце месяца?", vbYesNo)
If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD
Payment = Pmt(APR / 12, TotPmts, -PVal, FVal, PayType)
MsgBox "Размер взноса составит " & Format(Payment, Fmt) & " в месяц." | Дополнительная информация Категория: Тригонометрические и финансовые функции Еще функции: Atn, Cos, DDB, FV, IPmt, IRR, Log, MIRR, NPer, NPV, Pmt, PPmt, PV, Rate, Sin, SLN, SYD, Tan |
|
|
Справочник по Visual Basic