[컴퓨터활용능력] 2021 컴활 1급 실기 프로시저 작성 요약정리

안녕하세요 점보 곰입니다. 

 

 컴활 1급 실기 마지막 부분인 기타 작업(프로시저 작성)에 대해 예제를 통해 정리해봤습니다. 사실 2번은 복잡하고 오래 걸리기에 전 안 푸는 쪽으로 공부하고 있습니다. 차라리 함수에 시간을... 하하하 자세히 보실 분은 천천히 읽어주시고 바쁘신 분들은 결론 부분에서 요약한 거 봐주시면 될 것 같아요.

 아 그리고 제 블로그에 컴활 관련 자료 올려두었으니 관심 있으신 분들은 한번 확인해 주시면 감사하겠습니다.

 

2021 컴활 1급 실기 프로시저 문제

2021 컴활 1급 실기 프로시저 시작

1번 항목 풀이

‘성적 입력’, 폼이 초기화(Initialize)되면 수강자(cmb수강자)에는 [K6:L17] 영역의 값이 표시되도록 설정하시오.

 

단추 클릭 시 폼을 나타나게 설정하는 것은 아주 쉽습니다. 일단 모드 누르고 성적 입력이 적힌 버튼을 더블클릭.

폼을 나타나게

위와 같은 창이 나오면 성적 등록 화면. show라고 작성해 주면 됩니다.

 

폼이 나타나도록 = 폼 이름. show

 

폼을 선택하고 Initialize를 선택해 줍니다.

위의 문제대로 폼이 초기화(Initialize)되면 수강자(cmb수강자)에는 [K6:L17] 영역의 값이 표시되도록 설정하시오.

cmb수강자에 k6:L17 영역이 표시되도록 설정하라고 했으니

cmb수강자. Rowsource = "K6:L17"라고 작성해주면 됩니다.

초기화(Initialize)되면 ~에 값이 표시되도록 = 개체 이름. Rowsource = "셀 주소"

 

초기화(Initialize)되면 ~에 "펭귄", "곰", "닭", "돼지" 값이 표시되도록 해라.

  개체 이름. Additem "펭귄"

  개체 이름. Additem "곰"

  개체 이름. Additem "닭"

  개체 이름. Additem "돼지"

 

1번 항목 결과 화면

3번 항목 풀이     

종료(cmd종료) 단추를 클릭하면 <그림>과 같은 메시지 메시지 박스를 표시한 후 폼을 종료하는 프로시저를 작성하시오.

▶ 시스템의 현재 시간과 “ 평가를 종료합니다.” 텍스트를 함께 표시

 

3번항목 풀이

MsgBox Time() & " 평가를 종료합니다.", , "등록 종료"

 

MsgBox  "  나와야 할 메시지 부분", 단추 옵션 부분, "제목 부분"

Unload Me = 종료 버튼을 클릭하면 폼이 삭제된다.

 

Range("b6"). Font.Name = "궁서"

Range("b6"). Font.Bold = True처럼 서식을 적용할 수도 있고

MsgBox Range("a4"). CurrentRegion.Rows.Count - 2 & "명입니다."와 같이 행의 갯 수를 구할 수도 있다.

 

결론 및 요약

폼 열어라.

     폼 이름. Show

 

캄보 상자 안에 목록 값을 입력하라.

     개체 이름. Rowsource = "셀 주소"

     

     개체 이름. Additem "펭귄"

     개체 이름. Additem "곰"

     개체 이름. Additem "닭"

     개체 이름. Additem "돼지"

 

종료해라.

     Unload Me

 

메시지 박스 띄워라.

     MsgBox  "  나와야 할 메시지 부분", 단추 옵션 부분, "제목 부분"

Ex) MsgBox Time() & " 평가를 종료합니다.", , "등록 종료"       -현재시간

     MsgBox Now() & " 평가를 종료합니다.", , "등록 종료"       -현재 날짜와 시간

     MsgBox Date() & " 평가를 종료합니다.", , "등록 종료"       -현재 날짜

     MsgBox Range("a4"). CurrentRegion.Rows.Count - 1 & "개입니다." - 입력되어있는 행의 개수를 구할 때

 

서식 적용해라.

     Range("b6"). Font.Name = "궁서"

     Range("b6"). Font.Bold = True

 

 

 

휴.. 생각나는 건 이 정도입니다. 도움이 조금이나마 되셨으면 좋겠습니다.

 

END🐻