책 내용 질문하기
액세스 기본모의고사 1회 질문이요~
도서
[2012] 컴퓨터활용능력 1급 실기(엑셀, 액세스 2007 사용자용)
페이지
271
조회수
178
작성일
2012-04-10
작성자
첨부파일

액세스 기본모의고사 1회 271쪽 3번 문제 보면

<확인>버튼을 클릭했을때만 폼을 닫으라고 나와있는데요,

Pricate Sub cmd닫기_click( )

dim aa

aa = msgbox("폼을 닫습니다.", vbokcancle, "")

if aa = vbok then

docmd.close

end if

end sub

이렇게 입력했고, 답도 위와 같았는데요,

실행시켜 보니깐 확인 누르면 닫아지는건 맞는데

취소버튼 눌러도 폼이 닫아지네요ㅠ

취소버튼 누르면 폼이 안닫아지게 어떻게 하죠??

답변
2012-04-12 05:39:47

Private Sub cmd닫기_Click()
Dim aa
aa = MsgBox("폼을 닫을까요?", vbOKCancel, "")
If aa = vbOK Then
DoCmd.Close
End If
End Sub

코드에는 이상이 없는것 같은데요.

이 코드 차체가 ok를 눌렀을때 폼이 닫히게 되어 있는 것입니다.

aa라는 변수에 msgbox에서 선택한 값이 저장되고

저장된 값이 ok인지 확인 하여 폼을 닫고

아니라면 아무것도 실행하지 않기 때문에 맞습니다.

다시 한번 확인해 보시구요. 잘안되신다면 작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.

좋은 하루 되세요.

"
  • *
    2012-04-12 05:39:47

    Private Sub cmd닫기_Click()
    Dim aa
    aa = MsgBox("폼을 닫을까요?", vbOKCancel, "")
    If aa = vbOK Then
    DoCmd.Close
    End If
    End Sub

    코드에는 이상이 없는것 같은데요.

    이 코드 차체가 ok를 눌렀을때 폼이 닫히게 되어 있는 것입니다.

    aa라는 변수에 msgbox에서 선택한 값이 저장되고

    저장된 값이 ok인지 확인 하여 폼을 닫고

    아니라면 아무것도 실행하지 않기 때문에 맞습니다.

    다시 한번 확인해 보시구요. 잘안되신다면 작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.

    좋은 하루 되세요.

    "
· 5MB 이하의 zip, 문서, 이미지 파일만 가능합니다.
· 폭언, 욕설, 비방 등은 관리자에 의해 경고없이 삭제됩니다.