책 내용 질문하기
21년 상시 02_엑셀 채점
도서
2021 시나공 컴퓨터활용능력 1급 실기
페이지
0
조회수
226
작성일
2022-09-12
작성자
탈퇴*원
첨부파일

시나공 온라인 채점으로 했더니 분석작업 데이터 유효성 검사가 0점 처리되었는데 채점 부탁드립니다.

(매크로는 채점할 때마다 전 바꾼게 없음에도 0점이었다가 10점이었다가 왔다갔다하네요...)

프로시저도 다 맞은것 같은데 왜 1번만 맞는지 확인부탁드립니다!

 

2. 지시사항 처리 0/10
X 유효성검사 규칙 범위1 값(중간고사, 기말고사, 수행평가)이 정답(중간고사,기말고사,수행평가)과 다릅니다.
X 유효성검사 규칙 범위1 값(중간고사, 기말고사, 수행평가)이 정답(중간고사,기말고사,수행평가)과 다릅니다.
X 유효성검사 규칙 범위1 값(중간고사, 기말고사, 수행평가)이 정답(중간고사,기말고사,수행평가)과 다릅니다.
X 유효성검사 규칙 범위1 값(중간고사, 기말고사, 수행평가)이 정답(중간고사,기말고사,수행평가)과 다릅니다.

3. 프로시저 작업 5/15
① 비품관리 설정 5/5
② 데이터 추가 0/5
X 마지막 행에 데이터가 입력되지 않았습니다.
③ 종료 0/5
X [cmd종료_Click] 매크로가 정답과 다릅니다.
답변
2022-09-14 11:09:03

김단아 님, 안녕하세요.

온라인 채점 서비스 관리자입니다.

 

1. 유효성 검사

온라인 채점 서비스는 정답 파일과 일치해야 정답으로 채점이 된답니다~

그래서 유효성 검사의 경우 공백을 지우시고 채점하신다면 해당 부분은 문제 없을 것입니다.

- 수정 전: 중간고사, 기말고사, 수행평가

- 수정 후: 중간고사,기말고사,수행평가

 

2. 프로시저

1) cmd등록_Click

작성하신 'cmd등록_Click' 프로시저를 확인해보니 정답과 다르더라고요~

아래와 같이 수정하여 재채점 부탁드립니다.

- 수정 전

txt구매일.Value = Cells(입력행, 1)

cmb비품명.Value = Cells(입력행, 2)

txt취득원가.Value = Cells(입력행, 3)

txt내용연수.Value = Cells(입력행, 4)

txt잔존가치.Value = Cells(입력행, 5)

- 수정 후

Cells(입력행, 1) = txt구매일.Value

Cells(입력행, 2) = cmb비품명.Value

Cells(입력행, 3) = txt취득원가.Value

Cells(입력행, 4) = txt내용연수.Value

Cells(입력행, 5) = txt잔존가치.Value

 

2) cmd종료_Click

이 프로시저는 오타가 있었습니다.

- 수정 전: 면종료

- 수정 후: 화면종료

 

 

위 '수정 후' 내용대로 수정하여 채점해보시고요~

문제가 있다면 문의 부탁드립니다.

 

감사합니다 :)

  • 관리자
    2022-09-14 11:09:03

    김단아 님, 안녕하세요.

    온라인 채점 서비스 관리자입니다.

     

    1. 유효성 검사

    온라인 채점 서비스는 정답 파일과 일치해야 정답으로 채점이 된답니다~

    그래서 유효성 검사의 경우 공백을 지우시고 채점하신다면 해당 부분은 문제 없을 것입니다.

    - 수정 전: 중간고사, 기말고사, 수행평가

    - 수정 후: 중간고사,기말고사,수행평가

     

    2. 프로시저

    1) cmd등록_Click

    작성하신 'cmd등록_Click' 프로시저를 확인해보니 정답과 다르더라고요~

    아래와 같이 수정하여 재채점 부탁드립니다.

    - 수정 전

    txt구매일.Value = Cells(입력행, 1)

    cmb비품명.Value = Cells(입력행, 2)

    txt취득원가.Value = Cells(입력행, 3)

    txt내용연수.Value = Cells(입력행, 4)

    txt잔존가치.Value = Cells(입력행, 5)

    - 수정 후

    Cells(입력행, 1) = txt구매일.Value

    Cells(입력행, 2) = cmb비품명.Value

    Cells(입력행, 3) = txt취득원가.Value

    Cells(입력행, 4) = txt내용연수.Value

    Cells(입력행, 5) = txt잔존가치.Value

     

    2) cmd종료_Click

    이 프로시저는 오타가 있었습니다.

    - 수정 전: 면종료

    - 수정 후: 화면종료

     

     

    위 '수정 후' 내용대로 수정하여 채점해보시고요~

    문제가 있다면 문의 부탁드립니다.

     

    감사합니다 :)

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