책 내용 질문하기
컴활 1급실기 스프레드시트편 프로시저관련 질문입니다 (p.239)
도서
2020 시나공 컴퓨터활용능력 1급 실기 [기본서]
페이지
239
조회수
217
작성일
2020-08-07
작성자
탈퇴*원
첨부파일

현재 프로지서 창에서

 

Private Sub cmd등록_Click()

    If txt제품명 = "" Then

        MsgBox "제품명을 입력하시오."

    EIseIf txt수량 = "" Then

        MsgBox "수량을 입력하시오."

    eIseif txt단가 = "" Then

        MsgBox "단가를 입력하시오."

    eIseif cmb결재형태 = "" Then

        MsgBox "결재형태를 입력하시오."

    Else

        기준행위치 = [b3].Row

        기준행범위행수 = [b3].CurrentRegion.Rows.Count

        입력행 = 기준행위치 + 기준행범위행수

        Cells(입력행, 2) = CDate(txt판매일자)

        Cells(입력행, 3) = txt제품명

        Cells(입력행, 4) = Val(txt수량)

        Cells(입력행, 5) = Val(txt단가)

        Cells(입력행, 6) = Format(Val(txt수량) * Val(txt단가), "currency")

        Cells(입력행, 7) = cmb(결재형태)

        

        txt제품명 = ""

        txt수량 = ""

        txt단가 = ""

        cmb결재형태 = ""

    End If

    

 

로 입력한 뒤 프로시저를 실행하면 

컴파일 오류입니다

구문오류입니다

라고 창이 뜨면서

elseif 줄에 빨간색 선이 표시됩니다 ( EIseIf txt수량 = "" Then)

그대로 입력한 것 같은데 어떤 부분이 잘못된 지 모르겠어서 질문 납깁니다

답변
2020-08-10 19:50:26

 If txt제품명 = "" Then

        MsgBox "제품명을 입력하시오."

    EIseIf txt수량 = "" Then

        MsgBox "수량을 입력하시오."

    eIseif txt단가 = "" Then

        MsgBox "단가를 입력하시오."

    eIseif cmb결재형태 = "" Then

        MsgBox "결재형태를 입력하시오."

    Else

 

빨간색으로 표시된 부분이 잘 못 입력되었습니다. 

 

i 가 아니라 L 입니다. 수정 후 확인 해 보세요. 

 

좋은 하루 되세요. 

  • 관리자
    2020-08-10 19:50:26

     If txt제품명 = "" Then

            MsgBox "제품명을 입력하시오."

        EIseIf txt수량 = "" Then

            MsgBox "수량을 입력하시오."

        eIseif txt단가 = "" Then

            MsgBox "단가를 입력하시오."

        eIseif cmb결재형태 = "" Then

            MsgBox "결재형태를 입력하시오."

        Else

     

    빨간색으로 표시된 부분이 잘 못 입력되었습니다. 

     

    i 가 아니라 L 입니다. 수정 후 확인 해 보세요. 

     

    좋은 하루 되세요. 

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