책 내용 질문하기
프로시저
도서
2024 시나공 컴퓨터활용능력 1급 실기 기본서
페이지
0
조회수
70
작성일
2024-06-27
작성자
조*은
첨부파일
프로시저 기출01번 문제에서 select ~ case 명령문 작성할 때
Private Sub cmd등록_Click()
기준행위치 = [b3].Row
기준범위행수 = [b3].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
Cells(입력행, 2) = 입력행 - 3 & txt이름.Value
Cells(입력행, 3) = txt국어.Value
Cells(입력행, 4) = txt영어.Value
Cells(입력행, 5) = txt수학.Value
Cells(입력행, 6) = Format((Val(txt국어) + Val(txt영어) + Val(txt수학)) / 3, "0.00")
Select Case Cells(입력행, 6)
Case ls < 60
Cells(입력행, 7) = "가"
Case ls < 70
Cells(입력행, 7) = "양"
Case ls < 80
Cells(입력행, 7) = "미"
Case ls < 90
Cells(입력행, 7) = "우"
Case Else
Cells(입력행, 7) = "수"
End Select
Cells(입력행, 8) = cmd성별.Caption
txt이름.Value = ""
txt수학.Value = ""
txt영어.Value = ""
txt수학.Value = ""
End Sub
여기서 잘못된 부분이 있나요? 왜 평가 칸이 모두 다 "수"로 나오는 것일까요?
답변
2024-07-01 22:04:30
안녕하세요.
Format 함수로 인해 Cells(입력행, 6) 셀에 입력된 값이 숫자가 아닌 텍스트로 입력되었기 때문입니다.
즐거운 하루 되세요.
-
관리자2024-07-01 22:04:30
안녕하세요.
Format 함수로 인해 Cells(입력행, 6) 셀에 입력된 값이 숫자가 아닌 텍스트로 입력되었기 때문입니다.
즐거운 하루 되세요.