시나공

시험에

나오는 것만

공부한다!

Private Sub cmd입력_Click()
입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count

Cells(입력행, 1) = CDate(txt일자)
Cells(입력행, 2) = cmb종류
Cells(입력행, 3) = txt수량
Cells(입력행, 4) = txt단가
Cells(입력행, 5) = format(txt수량 * txt단가, "#,###")
Select Case Cells(입력행, 6)
Case ch할인여부 = True
Cells(입력행, 6) = Val(txt단가) * Val(txt수량) * 0.1
Case Else
Cells(입력행, 6) = 0
End Select

cmb종류 = ""
txt수량 = ""
txt단가 = ""

End Sub

if 랑 case 랑 ch할인여부 = true 는 둘다 같이 할인여부를 체크했을 때라고 하셨는데요

한번 해보세요. case 위 같이 했을경우 할인여부가 체크되어있을때 할인이 안된것으로 나옵니다

if 구문으로 했을시에는 ch할인여부=true 가 할인여부 체크했을시 할인이 되는걸로

case 에서는 ch할인여부=true 가 할인여부 체크하지 않았을 때 할인이 되는걸로 나옵니다

왜 이런걸까요?

저는 확인했으니 선생님도 한번 확인해주시기 바랍니다.

만약 함수가 잘못입력되서 그런거 일수도 있으니 함수도 확인해주세요