책 내용 질문하기
엑세스 섹션8 문제2 5번문제
도서
2018 시나공 컴퓨터활용능력 1급 실기(엑셀, 액세스 2010 사용자용)
페이지
217
조회수
23
작성일
2018-11-15
작성자
탈퇴*원
첨부파일

왜 정답과 같이 소스를 적었는데

계속 "불량 납품처"라고 뜨는지 모르겠습니다.

사진은 한장밖에 안올라가는거 같아서 제가 적은 소스는 텍스트로 올리겠습니다

Private Sub 납품수량_GotFocus()
If 납부수량 >= 100 Then
MsgBox "우량 납품처", vbOKOnly, "거래처등급"
ElseIf 납부수량 >= 50 Then
MsgBox "일반 납품처", vbOKOnly, "거래처등급"
Else
MsgBox "불량 납품처", vbOKOnly, "거래처등급"
End If


End Sub

또한 msgbox를 쓸때 어떨때는 괄호를 해줘야하고 어쩔땐 안쓰던데 그 차이가 무엇인가요??

답변
2018-11-15 21:33:20

안녕하세요.

코드에서 납부수량 으로 적으셨습니다.

납품수량 으로 변경해 주세요.

코드에서 비교를 납부수량과 하면서, 조건이 모두 만족되지 못해서 무조건 "불량 납부처"로 출력된 것입니다.

게시판 첨부파일은 zip 형태로 압축하셔서 첨부하시면 됩니다,

좋은 하루 보내세요.

  • *
    2018-11-15 21:33:20

    안녕하세요.

    코드에서 납부수량 으로 적으셨습니다.

    납품수량 으로 변경해 주세요.

    코드에서 비교를 납부수량과 하면서, 조건이 모두 만족되지 못해서 무조건 "불량 납부처"로 출력된 것입니다.

    게시판 첨부파일은 zip 형태로 압축하셔서 첨부하시면 됩니다,

    좋은 하루 보내세요.

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