책 내용 질문하기
2024 시나공 컴퓨터활용능력 1급 실기 총정리 345쪽 기출6번 질문
도서
2024 시나공 컴퓨터활용능력 1급 실기 총정리
페이지
345
조회수
36
작성일
2024-12-02
작성자
목*일
첨부파일
Private Sub cmd보고서_Click()
MsgBox "회원별주문내역 보고서를 확인합니다.", vbOKOnly, "보고서출력"
DoCmd.OpenReport "회원별주문내역", acViewPreview
End Sub
ㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡㅡ
Private Sub cmd보고서_Click()
Dim a
a = MsgBox("회원별주문내역 보고서를 확인합니다.", vbOKOnly, "보고서출력")
If a = vbOKOnly Then
DoCmd.OpenReport "회원별주문내역", acViewPreview
End If
End Sub
첫번째 코드가 정답지에 나와있습니다.
두번째 코드가 아무런 동작을 하지 않아서 질문드립니다. 어떠한 부분이 잘못된건가요? else구문을 작성하지 않아서 그런건가요?
답변
2024-12-04 13:56:04
안녕하세요.
'If a = vbOKOnly' Then을 'If a = vbOK Then'으로 수정하세요.
메시지 박스에 여러 단추가 있고, 어떤 단추를 클릭하냐에 따라 다르게 실행해야 하는 경우 변수와 IF문으로 사용하여 조건을 지정하는 것입니다. <확인> 단추 하나만 있을 때는 그 단추만을 선택할 수 있으므로 변수와 IF문을 이용할 필요가 없는 것입니다.
즐거운 하루 되세요.
-
관리자2024-12-04 13:56:04
안녕하세요.
'If a = vbOKOnly' Then을 'If a = vbOK Then'으로 수정하세요.
메시지 박스에 여러 단추가 있고, 어떤 단추를 클릭하냐에 따라 다르게 실행해야 하는 경우 변수와 IF문으로 사용하여 조건을 지정하는 것입니다. <확인> 단추 하나만 있을 때는 그 단추만을 선택할 수 있으므로 변수와 IF문을 이용할 필요가 없는 것입니다.
즐거운 하루 되세요.