시나공

시험에

나오는 것만

공부한다!

2016년 2회대비 폴더의 2016년 1회 기출문제(1급 E형)

2016년_2회대비_컴활1급실기\16년1회1급E형\1급 E형 정답.accdb

문제 2 입력 및 수정 기능 구현 (pdf 파일 3쪽)
2. 환자관리 폼의 하위 폼 본문의 'txt서비스명' 컨트롤에 서비스명이 표시되도록 구현하시오
▶ Dlookup() 함수 사용
▶ 폼 화면에는 '서비스코드'가 표시되어 있지않음

정답(pdf 파일 11쪽)

데이터 탭 컨트롤 원본

→ =DLookUp("서비스명","서비스신청현황","Forms![환자관리]![환자코드]=[서비스신청현황]![환자코드]")

<질문 시작>

질문> 위 정답(DLookup 함수)에서 현재 폼의 명칭(음영 부분)을 생략하고 아래와 같이 작성해도 정상 작동합니다.

=DLookUp("서비스명","서비스신청현황","[환자코드]=[서비스신청현황]![환자코드]")

위와 같이 경로명 일부를 생략해도 되는 법칙이 있다면 정확히 설명 좀 해주세요!

감사합니다.

<질문 끝>

※ 참고로 2013년 3회 액세스 기출문제 VB 작성에서도, 경로명 일부(현재 폼 명칭) 생략가능함을 알았습니다.

아래 문제에서는 매크로 작성을 요구했는데,

비주얼 베이직으로 변환 후 일부 정정해서 테스트 해보니 일부 경로명 생략 가능함을 알았습니다.

문제 3 조회 및 출력 기능 구현

3. '판매현황' 폼의 <인쇄> 버튼 (cmd인쇄)을 클릭하면 다음곽 같은 기능을 수행하도록 매크로 작성하시오.

▶ '제조사별판매현황' 폼 보고서를 '인쇄 미리보기'의 형태로 열 것.

▶ 하위 폼의 판매일자와 같은 월의 데이터만 출력하도록 할 것.

<정답>

매크로 함수: OpenReport

Where 조건문: Month([판매일자])=Month([Forms]![판매현황]![판매정보]![txt판매일자])

위 매크로를 아래와 같이 VB로 작성해봤습니다.

아래 코딩에서 음영 부분을 삭제해도 정상 작동되는 것을 알게 되었습니다.

Private Sub cmd인쇄_Click()
DoCmd.OpenReport "제조사별제품판매현황", acViewPreview, "", "Month(판매일자)=Month(#" & Forms!판매현황!판매정보!txt판매일자 & "#)"
End Sub