인하대학교 사회인프라공학과 컴퓨터프로그래밍 중간고사 레포트
- 최초 등록일
- 2020.05.21
- 최종 저작일
- 2019.04
- 11페이지/
한컴오피스
- 가격 1,500원
소개글
"인하대학교 사회인프라공학과 컴퓨터프로그래밍 중간고사 레포트"에 대한 내용입니다.
목차
① Form의 각 탭에서 계산결과 화면 (기본자료를 임의로 설정하고, 화면 capture를 사용)
② FormIncomeTax의 부프로그램 DisplayIncomeTax와 GetIncomeTax
③ ModuleTaxFunctions의 함수프로그램 GetPensionDeduction, GetIncomeDeduction, GetDonationDeduction
④ ModuleGrid의 함수프로그램 SetTaxGrid와 ModuleChart의 함수프로그램 SetTaxSeries
⑤ 부양인이 2명인 경우에 총소득 1억5천만원 이하의 공무원과 2억원 이하의 일반 근로자에 대한 소득별 저축액을 분석하고 그 결과에 대한 설명
본문내용
② FormIncomeTax의 부프로그램 DisplayIncomeTax와 GetIncomeTax
* Form 코딩창의 부프로그램 DisplayIncomeTax
Private Sub DisplayIncomeTax()
'과세대상 연간근로소득
Dim totalINC As Double = Val(Replace(BoxEarnedIncome.Text, ",", "")) '변수선언(15쪽)
BoxEarnedIncome.Text = Format(totalINC, "#,0") '문자변환(25쪽)
Dim earnedINC As Double = totalINC - 360 * 만원 : If earnedINC < 0 Then earnedINC = 0
BoxTaxedIncome.Text = Format(earnedINC, "#,0") : ListIncomeDeduction.Items.Clear()
'근로소득공제
Dim deduction = GetEarnedINCDeduction(earnedINC), sumDeduction = deduction
ListIncomeDeduction.Items.Add("근로공제 : " & GetFixedLengthValue(deduction))
'기본/인적
deduction = 150 * 만원 : sumDeduction += deduction
ListIncomeDeduction.Items.Add("기본공제 : " & GetFixedLengthValue(deduction))
deduction = NumericDependent.Value * 150 * 만원 : sumDeduction += deduction
ListIncomeDeduction.Items.Add("인적공제 : " & GetFixedLengthValue(deduction))
'4대 보험 부담금 공제
deduction = GetPensionDedution(earnedINC, RadioNational.Checked)
Dim sum공적지출 = deduction
참고 자료
없음
