시나공

시험에

나오는 것만

공부한다!

1. 13년컴활1급실기(3회분)\13년상시\01 1급 상시(정답).xlsm

컴활1급 엑셀, 2013년 상시

161쪽

문제4

02. 프로시저 작성

② <입력> 버튼에 기능 구현하기

Private Sub cmd입력_Click()
입력행 = [b2].Row + [b2].CurrentRegion.Rows.Count

If Val(txt토익) > 100 Or Val(txt컴퓨터) > 100 Or Val(txt전공2) > 100 Then
MsgBox "점수는 0-100사이의 값을 입력하세요"
Else

Cells(입력행, 2) = txt이름
Cells(입력행, 3) = Format(txt학번, ">&&&&&&")
Cells(입력행, 4) = cmb학과명
Cells(입력행, 5) = Val(txt토익)
Cells(입력행, 6) = Val(txt컴퓨터)
Cells(입력행, 7) = Val(txt전공2)
cmb학과명.Locked= True
End If
End Sub

질문1> 위 프로시저 중 연두색 음영 부분에서 Val함수를 제거하고,

If txt토익 > 100 Or txt컴퓨터 > 100 Or txt전공2 > 100 Then으로

입력해도 이상없이 계산이 이루어지는 거 아닌가요?

질문2> 시트의 셀이나, 컨트롤의 값이 숫자로만 이루어져있으면 숫자화 안시켜도, 출력 형식에는

문제가 될 수 있지만, 이상없이 계산이 이루어지는 거 아닌가요?

감사합니다.