책 내용 질문하기
2023년상시03 1급 엑세스(1급기본2024 실기교재)
도서
2024 시나공 컴퓨터활용능력 1급 실기 기본서
페이지
243
조회수
32
작성일
2025-02-05
작성자
김*주
첨부파일

작성한 답


Private Sub 폼_머리글_DblClick(Cancel As Integer)



MsgBox "폼에 적용된 필터를 해제할까요?", vbYesNo, "확인"


If vbYes Then

FilterOn = 0

End If



End Sub





정답 ----

Private Sub 폼_머리글_DblClick(Cancel As Integer)

Dim a

a = MsgBox("폼에 적용된 필터를 해제할까요?", vbYesNo, "확인")

If a = vbYes Then

cmb조회 = ""

Me.FilterOn = False

End If

End Sub







작동은 정상적으로 됩니다.오답처리 될까요?
답변
2025-02-10 10:43:33

안녕하세요.

본인 처럼 작성하면 정상적으로 실행되지 않으므로 당연히 틀린 것이 됩니다.

MsgBox에서 선택한 값을 특정 변수에 저장한 후 그 값이 vbYes인지를 비교해야 합니다.

즐거운 하루 되세요.

  • 관리자
    2025-02-10 10:43:33

    안녕하세요.

    본인 처럼 작성하면 정상적으로 실행되지 않으므로 당연히 틀린 것이 됩니다.

    MsgBox에서 선택한 값을 특정 변수에 저장한 후 그 값이 vbYes인지를 비교해야 합니다.

    즐거운 하루 되세요.

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