기출문제 2016년 2회 E형 문제4-2-2
제가 보기에는 정답지와 동일하게 작성된 거 같은데, 오답으로 채점되는데, 어디가 틀린걸까요??
Private Sub cmd등록_Click()
입력행 = [b3].Row + [b3].CurrentRegion.Rows.Count
Cells(입력행, 2) = cmb분야.Value
If opt국내서.Value = True Then
Cells(입력행, 3) = "국내서"
ElseIf opt외국서.Value = True Then
Cells(입력행, 3) = "외국서"
Else
Cells(입력행, 3) = "eBook"
End If
Cells(입력행, 4) = txt제목.Value
Cells(입력행, 5) = txt정가.Value
Cells(입력행, 6) = txt저자.Value
Cells(입력행, 7) = txt출판사.Value
Cells(입력행, 8) = txt발행연도.Value
End Sub
채점을 아래와 같이 나왔습니다.
② 프로시저 작성 0/5
결과 X 매크로 실행 : VBA ERROR
해당파일 첨부하겠습니다.
안녕하세요.
폼을 실행하면 정상적으로 실행이 되야 하는데 실행되지 않아 감점된 것입니다. Private Sub UserForm_Initialize() 부분의 cmb영역.RowSource = "j5:j10"을 cmb분야.RowSource = "j5:j10"으로 수정해 주세요.
즐거운 하루되세요.
-
관리자2023-09-20 00:00:33
안녕하세요.
폼을 실행하면 정상적으로 실행이 되야 하는데 실행되지 않아 감점된 것입니다. Private Sub UserForm_Initialize() 부분의 cmb영역.RowSource = "j5:j10"을 cmb분야.RowSource = "j5:j10"으로 수정해 주세요.
즐거운 하루되세요.