105페이지 2번 문제에서
Public Function F단가(도서코드, 정가)
If Len(도서코드) = 7 Then
F단가 = Round(정가 / Mid(도서코드, 3, 3))
Else
F단가 = Round(정가 / Mid(도서코드, 3, 2))
End If
End Function
모듈을 이렇게 작성하면 답이 나옵니다.
그런데 교재에 IF문 말고 SELECT문으로도 출제가 된다기에
연습삼아 SELECT문으로 아래와 같이 해보았는데 오류가 납니다ㅠㅠ
Public Function F단가(도서코드, 정가)
Select Case Len(도서코드)
Case Is = 7
F단가 = Round(정가 / Mid(도서코드, 3, 3), 0)
Case Else
F단가 = Round(정가 / Mid(도서코드, 3, 2), 0)
End Select
End Function
어떤 부분이 문제인가요?
조건에 함수가 들어가는 경우에는 SELECT문은 쓸수 없는 것인가요?
Public Function F단가(도서코드, 정가)
Select Case Len(도서코드)
Case Is = 7
F단가 = Round(정가 / Mid(도서코드, 3, 3), 0)
Case Else
F단가 = Round(정가 / Mid(도서코드, 3, 2), 0)
End Select
End Function
로 작성하는 것이 맞습니다.
질문 주신 내용만으로는 오류가 나는 이유를 알기가 어렵네요.
작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.
좋은 하루 되세요.
-
*2015-09-23 07:06:38
Public Function F단가(도서코드, 정가)
Select Case Len(도서코드)
Case Is = 7
F단가 = Round(정가 / Mid(도서코드, 3, 3), 0)
Case Else
F단가 = Round(정가 / Mid(도서코드, 3, 2), 0)
End Select
End Function로 작성하는 것이 맞습니다.
질문 주신 내용만으로는 오류가 나는 이유를 알기가 어렵네요.
작성하신 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.
좋은 하루 되세요.