책 내용 질문하기
End Sub
채점프로그램
도서
[2012] 컴퓨터활용능력 1급 실기(엑셀, 액세스 2007 사용자용)
페이지
387
조회수
96
작성일
2012-08-04
작성자
첨부파일
문제4-2번문제
분명히 맞게 한것같은데 채점프로그램에서 틀렸다고 하네요
사진도 첨부하고 파일도 첨부하겠습니다.
답변
2012-08-06 07:06:25
Private Sub cmd입력_Click()
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = CDate(txt구매일자)
Cells(입력행, 2) = List품목명
Cells(입력행, 3) = txt수량
Cells(입력행, 4) = Format(txt구매일자 * txt단가, "#,###")
List품목명 = ""
txt단가 = ""
txt수량 = ""
txt단가 = ""
txt수량 = ""
End Sub
txt수량 * txt단가
여야 하는데 구매일자를 곱하셨네요.
수정한 후 채점해 보세요.
좋은 하루 되세요.
"
-
*2012-08-06 07:06:25
Private Sub cmd입력_Click()
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
Cells(입력행, 1) = CDate(txt구매일자)
Cells(입력행, 2) = List품목명
Cells(입력행, 3) = txt수량
Cells(입력행, 4) = Format(txt구매일자 * txt단가, "#,###")List품목명 = ""
txt단가 = ""
txt수량 = ""
End Subtxt수량 * txt단가여야 하는데 구매일자를 곱하셨네요.수정한 후 채점해 보세요.좋은 하루 되세요."