1.
문제4-2 동그라미 2번 질문입니다.
제가 작성한 프로시저가 책의 정답과 다른데
이것도 맞는지 확인해주세요~
Private Sub cmd입력_Click()
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count
참조행 = cmb종목.ListIndex
Cells(입력행, 1) = Val(txt고객번호)
Cells(입력행, 2) = cmb성별
Cells(입력행, 3) = cmb종목.List(참조행, 0)
Cells(입력행, 4) = Val(txt사용시간)
Cells(입력행, 5) = Format(Cells(입력행, 4) * cmb종목.List(참조행, 1), "#,###")
End Sub
2.
문제2-6 질문입니다
책과 같은 결과가 나오지 않습니다. 뭐가 틀렸는지 알려주세요~
Public Function fn생산단가(상품코드, 판매단가)
If (Left(상품코드, 1) = 가) + (Right(상품코드, 1) = 1) * (Right(상품코드, 1) = 2) Then
fn생산단가 = 판매단가 * 0.3
Else
fn생산단가 = 판매단가 * 0.2
End If
End Function
안녕하세요.
1.
4-2-2
문제 지시사항에 위배되지 않고 정확히 실행되므로 사용하셔도 됩니다.
2,
작성하신 수식을 최소한으로 수정해서 정확한 결과가 나오게 하려면 다음과 같이 수정해 주셔야 합니다.
If (Left(상품코드, 1) = "가") * ((Right(상품코드, 1) = 1) + (Right(상품코드, 1) = 2)) Then
문자는 큰따옴표로 묶어주셔야 합니다.
좋은 하루 보내세요.
-
관리자2019-08-16 23:45:05
안녕하세요.
1.
4-2-2
문제 지시사항에 위배되지 않고 정확히 실행되므로 사용하셔도 됩니다.
2,
작성하신 수식을 최소한으로 수정해서 정확한 결과가 나오게 하려면 다음과 같이 수정해 주셔야 합니다.
If (Left(상품코드, 1) = "가") * ((Right(상품코드, 1) = 1) + (Right(상품코드, 1) = 2)) Then
문자는 큰따옴표로 묶어주셔야 합니다.
좋은 하루 보내세요.