본문 바로가기

프로그래밍 학습/컴퓨터활용능력 1급

[컴퓨터활용능력 1급] 실기정리 프로시저

728x90

컴활 1급실기 프로시저 정리.

문제1

폼을 초기화할때 L접수코드에 H7:H15 영역의 값이 추가되도록 하시오.




정답

L접수코드.RowSource = "H7:H15" -> 이것만쓰면 접수코드 1열밖에안나옴 

L접수코드.ColumnCount=2 ->열의 개수가 2개이상일때 사용함


문제2

콤보상자(cmb년수)에 국어,수학,영어가 추가되는 프로시저를 작성하시오.


정답1

With cmb년수

.Additem "국어"

.Additem "수학"

.Additem "영어"

End Sub


정답2

cmb년수.AddItem "국어"

cmb년수.AddItem "수학"

cmb년수.AddItem "영어"


정답3

cmb년수.List=Array("국어","수학","영어")


문제3

종료(cmb종료) 버튼을 클릭하면 폼이 종료되도록 하시오.




정답

Private Sub Cmd종료_Click()

Unload Me -> 여기에 간혹 DoCmd.Close 쓰시는분들 있는데 주의!!

End Sub


문제4

시트를 활성화(Activate)하면 [B3] 셀에 "한국"이 입력되도록 이벤트 프로시저를 작성하시오.




Private Sub Worksheet_Activate() -> 위 사진처럼 클릭하면 자동으로 작성됨

[B3]="한국" -> Cells(3,2)="한국" 이렇게 해도됨

End Sub


문제5

데이터 셀 위치가 변경(Change) 되면 해당셀의 글꼴이 궁서체로 설정되도록 이벤트 프로시저를 작성하시오.


정답



Private Sub Worksheet_Change(ByVal Target As Range) -> 위 사진처럼 클릭하면 자동으로 작성됨

Target.Font.Name = "궁서체"   -> Target은 변경된 셀들

End Sub


문제6

날짜(Lbl날짜) 레이블을 더블클릭하면 텍스트상자에 날짜와 시간이 표시되도록 작성하시오.



정답

먼저 날짜레이블을 더블클릭하는 함수를 선택해주세요.




Private Sub Lbl날짜_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

    Txt날짜 = Now() -> 날짜만 표시되려면 Date()를 쓰시면됩니다.

End Sub