4번 프로시저 입력에서요.
<정답>
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = CDate(txt구매일자)
Cells(입력행, 2) = List품목명
Cells(입력행, 3) = Val(txt수량)
Cells(입력행, 4) = Format(txt수량 * txt단가, "#,###")
List품목명 = ""
txt단가 = ""
txt수량 = ""
<제가 쓴 답>
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
참조행=list품목명.listindex
Cells(입력행, 1) = CDate(txt구매일자)
Cells(입력행, 2) = List품목명.list(참조행,0)
Cells(입력행, 3) = Val(txt수량)
Cells(입력행, 4) = Format(txt수량 * list품목명.list(참조행,1), "#,###")
List품목명 = ""
txt단가 = ""
txt수량 = ""
이거는 안되나요?
list품목명 보니까 바운드열이 1열로 지정되어 있어서
list품목명=품목명이 될 수 있으니까
Cells(입력행, 2) = List품목명 는 이해가 되는데요.
문제는
txt단가는 list품목명.list(참조행,1) 해줘야되지 않나요?
책에 있는 정답처럼만 해도 단가가 입력되던데 어째서죠?
제가 입력한 것처럼 하면 틀렸다고 나옵니다.
파일 첨부합니다.
안녕하세요.
txt단가는 lst품목명을 선택하면 자동으로 컨트롤에 입력되도록 기본 코드가 제공되고 있습니다.
제공되는 코드 : txt단가 = List품목명.Column(1)
그래서 txt단가 컨트롤에서 입력받은 값을 그대로 사용하실 수 있습니다.
점 프로그램은 정답과 비교하여 조금이라도 다르면 틀린 것으로 채점됩니다.
하지만 실제 시험에서는 문제의 지시사항을 모두 만족하고 결과값이 맞게 나왔다면 모두 맞는 것으로 채점됩니다.
입력하신 대로 작성하셔도 정확히 동작하므로 시험장에서는 정답으로 인정됩니다.
좋은 하루 보내세요.
-
관리자2019-08-25 21:30:59
안녕하세요.
txt단가는 lst품목명을 선택하면 자동으로 컨트롤에 입력되도록 기본 코드가 제공되고 있습니다.
제공되는 코드 : txt단가 = List품목명.Column(1)
그래서 txt단가 컨트롤에서 입력받은 값을 그대로 사용하실 수 있습니다.
점 프로그램은 정답과 비교하여 조금이라도 다르면 틀린 것으로 채점됩니다.
하지만 실제 시험에서는 문제의 지시사항을 모두 만족하고 결과값이 맞게 나왔다면 모두 맞는 것으로 채점됩니다.
입력하신 대로 작성하셔도 정확히 동작하므로 시험장에서는 정답으로 인정됩니다.
좋은 하루 보내세요.