Financial.SLN(Double, Double, Double) Метод

Определение

Пространство имен:

Microsoft.VisualBasic

Сборка:

Microsoft.VisualBasic.Core.dll

Исходный код:

Financial.vb

Возвращает значение, указывающее прямую амортизацию актива в течение одного периода.

public:
 static double SLN(double Cost, double Salvage, double Life);

public static double SLN(double Cost, double Salvage, double Life);

static member SLN : double * double * double -> double

Public Function SLN (Cost As Double, Salvage As Double, Life As Double) As Double

Параметры

Cost

Double

Обязательно. Начальная стоимость ресурса.

Salvage

Double

Обязательно. Значение ресурса в конце его полезной жизни.

Life

Double

Обязательно. Длина полезной жизни ресурса.

Возвращаемое значение

Double

Прямая амортизация актива в течение одного периода.

Исключения

ArgumentException

Life = 0.

Примеры

В этом примере функция используется SLN для возврата прямой амортизации актива в течение одного периода, учитывая начальную стоимость ресурса (InitCost), стоимость спасения в конце полезной жизни ресурса (SalvageVal), а также общую жизнь актива в годах (LifeTime).

Dim InitCost, SalvageVal, LifeTime, DepYear As Double
Dim Fmt As String = "###,##0.00"

InitCost = CDbl(InputBox("What's the initial cost of the asset?"))
SalvageVal = CDbl(InputBox("Enter the asset's value at end of its life."))
LifeTime = CDbl(InputBox("What's the asset's useful life in years?"))

' Use the SLN function to calculate the deprecation per year.
Dim SlnDepr As Double = SLN(InitCost, SalvageVal, LifeTime)
Dim msg As String = "The depreciation per year: " & Format(SlnDepr, Fmt)
msg &= vbCrLf & "Year" & vbTab & "Linear" & vbTab & "Doubling" & vbCrLf

' Use the SYD and DDB functions to calculate the deprecation for each year.
For DepYear = 1 To LifeTime
    msg &= DepYear & vbTab & 
        Format(SYD(InitCost, SalvageVal, LifeTime, DepYear), Fmt) & vbTab & 
        Format(DDB(InitCost, SalvageVal, LifeTime, DepYear), Fmt) & vbCrLf
Next
MsgBox(msg)

Комментарии

Период амортизации должен быть выражен в той же единице, что Life и аргумент. Значения всех аргументов должны быть положительными числами.

См. также раздел

• SYD(Double, Double, Double, Double)
• DDB(Double, Double, Double, Double, Double)
• ArgumentException
• Финансовая сводка