p.241 문제2의 3.에 대해서요
기출정답에서 그대로 복사해서 저의 답에 붙여넣으니 실행결과에
고객명, 고객등급, 매출금액, 결제방식 이렇게 표시되더라고요(마지막줄이 아닌 d3열의 값들이 표시됩니다)
Private Sub cmd고객조회_Click()
기준행위치 = [d3].Row
기준범위행수 = [d3].CurrentRegion.Rows.Count - 1
그래서 윗부분의 d3 을 d7로 바꾸니 정상적으로 결과가 표시됩니다.(요 파일 첨부합니다)
왜 그럴까요?
제가 답을 보고 고대로 입력하니 실행결과가 이상해서
답 파일의 프로시저를 그대로 복사해서 붙여도 실행결과가 이상하네요(답파일에서는 실행결과가 제대로 나오구요)
오타때문이네요.
기분범위행수 때문에 제대로 된 결과가 나오지 않는 것입니다.
Private Sub cmd고객조회_Click()
기준행위치 = [d3].Row
기준범위행수 = [d3].CurrentRegion.Rows.Count - 1
입력행 = 기준행위치 + 기준범위행수
txt고객명 = Cells(입력행, 4)
txt고객등급 = Cells(입력행, 5)
txt매출금액 = Cells(입력행, 6)
txt결제방식 = Cells(입력행, 7)
End Sub
수정하여 사용해 보시기 바랍니다.
좋은 하루 되세요.
"-
*2012-02-23 03:29:36
오타때문이네요.
기분범위행수 때문에 제대로 된 결과가 나오지 않는 것입니다.
Private Sub cmd고객조회_Click()
기준행위치 = [d3].Row
기준범위행수 = [d3].CurrentRegion.Rows.Count - 1
입력행 = 기준행위치 + 기준범위행수
txt고객명 = Cells(입력행, 4)
txt고객등급 = Cells(입력행, 5)
txt매출금액 = Cells(입력행, 6)
txt결제방식 = Cells(입력행, 7)
End Sub수정하여 사용해 보시기 바랍니다.
좋은 하루 되세요.
"