시나공

시험에

나오는 것만

공부한다!

p.229 기출문제01

Private Sub cmd등록_Click()
기준행위치 = [b3].Row
기준범위행수 = [b3].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
Cells(입력행, 2) = 입력행 - 3 & txt이름
Cells(입력행, 3) = txt국어
Cells(입력행, 4) = txt영어
Cells(입력행, 5) = txt수학
Cells(입력행, 6) = Format((Val(txt국어) + Val(txt영어) + Val(txt수학)) / 3, "0.00")

Select Case Cells(입력행, 6)
Case Is <= 59
Cells(입력행, 7) = "가"
Case Is <= 69
Cells(입력행, 7) = "양"
Case Is <= 79
Cells(입력행, 7) = "미"
Case Is <= 89
Cells(입력행, 7) = "우"
Case Else
Cells(입력행, 7) = "수"
End Select

Cells(입력행, 8) = cmd성별.Caption

txt이름 = ""
txt국어 = ""
txt영어 = ""
txt수학 = ""
End Sub

p.231 기출문제 04

Private Sub cmd입력_Click()
If IsNull(lst과목.Value) Then
lst과목.ListIndex = 0
txtID = "선택안함"
Else
참조행 = lst과목.ListIndex
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = UCase(txtID)
Cells(입력행, 2) = txt이름
Cells(입력행, 3) = lst과목.List(참조행, 0)
Cells(입력행, 4) = lst과목.List(참조행, 1)
Cells(입력행, 5) = lst과목.List(참조행, 2)
Cells(입력행, 6) = lst과목.List(참조행, 3) - (lst과목.List(참조행, 3) * 0.1)
txtID = ""
txt이름 = ""
txt날짜 = ""
lst과목 = ""
End If
End Sub

위에 내용은 수식을 이용한거고 아래쪽은 수식없이 바로 연산자를 붙여서 값을 계산하는데

차이를 알고 싶습니다

그리고 val, value 두 개의 쓰임새를 정확히 알고 싶습니다

언제 어떤것을 선택해서 써야하는지 알려주세요

그리고 지난번 질문답변 잘 받았습니다.

그런데 기존에 있던 답안에 복사붙여넣기식으로 답변을 주셔서 제가 물어본것에 대한 답안을 정확히 못 받아서
아쉬웠습니다.

수고하세요ㅎㅎ 감사합니다