시나공

시험에

나오는 것만

공부한다!

3.'창고정보'폼의 '닫기(cmd닫기)' 버튼을 클릭하면 다음과 같은 기능을 수행하도록 이벤트프로시저를 작성하시오.

<그림>과 같이 현재 시간이 표시된 메시지 박스를 표시한후 폼을 종료할것

정답은

Private Sub cmd닫기_Click()
MsgBox "현재 시각은 " & Time & "입니다.", , "폼 종료"
DoCmd.Close
End Sub
이렇게하면 교재 그림과 같이 메세지박스가 뜨고, 확인을 클릭하면 , 저장여부를 묻고 "창고정보'폼이 닫힘니다.

질문1)메세지상단 우측상단 모퉁이(X)를 클릭하면 확인을 클릭할때와 똑같은 과정으로 종료되는 데요.

(X)를 클릭할때는 메세지 상자만 닫혀야 하는게 아닌가요??

질문2)다음처럼문제를 풀었는데요

Private Sub cmd닫기_Click()
Dim aa
aa = MsgBox("현재 시각은 " & Time & "입니다.", , "폼종료")
If aa = vbYes Then
DoCmd.Close
End If

End Sub

- 메세지상자의 확인을 클릭했을때, 메세지상자만 사라지고, 폼은 그대로군요. 그리고 (X)를 클릭했을때는

마찬기지로 메세지 상자만 사라지고, 폼은 그대로 입니다.

어느때 dim aa와 같이 변수를 지정하는지, 어느때는 질문1처럼 변수 지정않는지 어떻게 구분할수 있나요?

질문3) 메세지상자의 확인을 클릭시, 메세지상자사라지고,폼저장여부를 묻고 닫히고, (X)를 클릭시는 메세지상자만 닫혀야 할것 같은데요. 기출문제에서 요구한 정답은 무엇입니까?