책 내용 질문하기
프로시저
도서
2022 시나공 컴퓨터활용능력 1급 실기(엑셀, 엑세스 2016)
페이지
251,261
조회수
325
작성일
2022-04-15
작성자
탈퇴*원
첨부파일

251쪽 

If txt제품명.Value=""Then

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

Elself txt수량.Value=""Then


맨처음 Then은 입력이 되는데 그 뒤에 Elself 뒤에 오는 Then들은 다 입력이 안돼요!! 컴파일 오류입니다. 목록끝이라고 떠요


​261쪽에 3번 폼의 자료를 워크시트에 입력하는 프로시저 작성하기

 

Cells(입력행, 2) = 입력행-3& txt이름.Value 

​이거도 다 입력하고 엔터 누르면 txt이름 부분에 커서 가고, 컴파일 오류입니다. 목록 끝 자꾸 떠요  

이거는 어떻게 해야해요?

답변
2022-04-15 19:07:56

If txt제품명.Value=""Then

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

Elself txt수량.Value=""Then


If txt제품명.Value="" Then

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

Elself txt수량.Value="" Then


​then 앞에 띄어쓰기를 해주세요.  

 

Cells(입력행, 2) = 입력행-3& txt이름.Value  

 

& 연산자 앞뒤로는 띄어쓰기 해주셔야 합니다. 

 

Cells(입력행, 2) = 입력행-3 & txt이름.Value  

 

좋은 하루 되세요. 

 


  • 관리자
    2022-04-15 19:07:56

    If txt제품명.Value=""Then

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

    Elself txt수량.Value=""Then


    If txt제품명.Value="" Then

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

    Elself txt수량.Value="" Then


    ​then 앞에 띄어쓰기를 해주세요.  

     

    Cells(입력행, 2) = 입력행-3& txt이름.Value  

     

    & 연산자 앞뒤로는 띄어쓰기 해주셔야 합니다. 

     

    Cells(입력행, 2) = 입력행-3 & txt이름.Value  

     

    좋은 하루 되세요. 

     


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