시나공

시험에

나오는 것만

공부한다!

안녕하세요.

기본모의고사 3회 4문 프로시저 관련하여 질문있습니다.

무선통신요금폼의 요금입력단추를 클릭하면 정산년도와 고객명이 빈칸으로 추가되면서

시간당 단가, 기본요금, 할인요금은 참조표의 숫자가 아니라 그냥 한글문자가 나타납니다.

어디를 수정해야 할나요??

왜 공란일때 메세지 박스가 뜨지 않는건가요??

Private Sub 요금입력_Click()

If txt년도.Value = " " Then

    MsgBox "정산년도를 입력하세요"

ElseIf txt고객.Value = " " Then

    MsgBox "고객명을 입력하세요"

ElseIf cmb코드.Value = " " Then

    MsgBox "등급코드를 선택하세요"

Else

    참조행 = cmb코드.ListIndex + 4

    입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count

    Cells(입력행, 1) = txt고객.Value

    Cells(입력행, 2) = cmb코드.Value

    Cells(입력행, 3) = Cells(참조행, 8)

    Cells(입력행, 4) = Cells(참조행, 9)

    Cells(입력행, 5) = Cells(참조행, 10)

End If

감사합니다.