Financial.SYD(Double, Double, Double, Double) 메서드

정의

네임스페이스:

Microsoft.VisualBasic

어셈블리:

Microsoft.VisualBasic.Core.dll

Source:

Financial.vb

지정한 기간 동안 자산의 연수 합계 감가상각을 지정하는 값을 반환합니다.

public:
 static double SYD(double Cost, double Salvage, double Life, double Period);

public static double SYD (double Cost, double Salvage, double Life, double Period);

static member SYD : double * double * double * double -> double

Public Function SYD (Cost As Double, Salvage As Double, Life As Double, Period As Double) As Double

매개 변수

Cost

Double

필수 요소. 초기 자산 비용입니다.

Salvage

Double

필수 요소. 내용 연수 종료 시점의 자산 값입니다.

Life

Double

필수 요소. 자산의 내용 연수 길이입니다.

Period

Double

필수 요소. 자산 감가상각이 계산되는 기간입니다.

반환

Double

지정한 기간 동안 자산의 연수 합계 감가상각입니다.

예외

ArgumentException

Salvage< 0, Period>Life 또는 Period<=0입니다.

예제

이 예제에서는 함수를 SYD 사용하여 자산의 초기 비용(), 자산의 유용한 수명 끝에 있는 회수 값() 및 자산의 총 수명(InitCostSalvageVal)을 고려하여 지정된 기간 동안 자산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)

설명

및 Period 인수는 Life 동일한 단위로 표현되어야 합니다. 예를 들어 가 개월 단위로 제공되는 경우 Life 은 월 Period 단위로 제공되어야 합니다. 모든 인수는 양수여야 합니다.

추가 정보

• DDB(Double, Double, Double, Double, Double)
• SLN(Double, Double, Double)
• ArgumentException
• 회계 요약