인하대학교 사회인프라공학과 컴퓨터프로그래밍 퀴즈1
- 최초 등록일
- 2020.10.22
- 최종 저작일
- 2019.11
- 7페이지/
한컴오피스
- 가격 1,000원
소개글
"인하대학교 사회인프라공학과 컴퓨터프로그래밍 퀴즈1"에 대한 내용입니다.
목차
1. Form의 계산결과 화면 (대학 졸업 후 10년의 예상 소득 및 지출을 가정한 기본자료와 이에 대한 계산결과 화면의 capture)
2. Form 코딩창의 부프로그램 DisplayIncomeTax 및 Module 창의 전체 프로그램
3. 부양가족 2인과 연소득이 천만 원씩 증가하는 경우의 각 순소득을 계산하고, 연소득을 수평축으로 하는 순소득의 그래프를 Excel을 사용하여 그린 화면의 capture
4. 절세를 위한 각 소득별 최적의 신용카드와 체크카드의 사용액
본문내용
② Form 코딩창의 부프로그램 DisplayIncomeTax 및 Module 창의 전체 프로그램
* 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)
참고 자료
없음
